diff --git a/src-server/Server/Types.hs b/src-server/Server/Types.hs index ff964eb..a81dd71 100644 --- a/src-server/Server/Types.hs +++ b/src-server/Server/Types.hs @@ -53,11 +53,11 @@ data ReaderContainer = ReaderContainer deriving (Eq, Show) data StateContainer = StateContainer - { scSpawners :: [ Spawner ] - , scPlayers :: [ Wizard ] + { scSpawners :: [Spawner] + , scPlayers :: [Wizard] , scServerState :: STM.TMVar ServerState , scServerLastTick :: UTCTime - , scClientSockets :: STM.TMVar [ (Maybe UUID, Socket) ] + , scClientSockets :: STM.TMVar [(Maybe UUID, Socket)] , scMessageQueue :: STM.TQueue ClientMessage }