diff --git a/src-server/Server/Communication/Send.hs b/src-server/Server/Communication/Send.hs index 05b727a..55e4503 100644 --- a/src-server/Server/Communication/Send.hs +++ b/src-server/Server/Communication/Send.hs @@ -35,13 +35,11 @@ import Linear import Network.Socket -import System.Random (randomRIO) - -- internal imports import Library.Types -import Server.Log (logPrintIO, logPrint) +import Server.Log (logPrintIO) import Server.Types -- | Sends a specified message through given socket to the client diff --git a/src-server/Server/Map.hs b/src-server/Server/Map.hs index cc88d1e..2e8d957 100644 --- a/src-server/Server/Map.hs +++ b/src-server/Server/Map.hs @@ -41,7 +41,7 @@ generateArena arenaRows arenaColumns spawnerChance = do : acc else pure acc - _ -> pure acc + _otherTiles -> pure acc ) [] ((,) <$> [1 .. arenaRows] <*> map fromIntegral [1 .. arenaColumns]) diff --git a/wizard-wipeout.cabal b/wizard-wipeout.cabal index 605266b..b3d3c57 100644 --- a/wizard-wipeout.cabal +++ b/wizard-wipeout.cabal @@ -15,8 +15,6 @@ extra-doc-files: CHANGELOG.md common warnings ghc-options: -Wall -threaded -rtsopts - -fwrite-ide-info - -hiedir=.hie library import: warnings