diff -r 95289aea4bb9 -r 73ab5a17ee55 gameServer/CoreTypes.hs --- a/gameServer/CoreTypes.hs Wed Jan 23 04:48:04 2013 +0100 +++ b/gameServer/CoreTypes.hs Wed Jan 23 23:54:01 2013 +0400 @@ -73,7 +73,7 @@ leftTeams :: [B.ByteString], teamsAtStart :: [TeamInfo], teamsInGameNumber :: Int, - allPlayersHaveRegisteredAccounts :: Bool, + allPlayersHaveRegisteredAccounts :: !Bool, giMapParams :: Map.Map B.ByteString B.ByteString, giParams :: Map.Map B.ByteString [B.ByteString] } deriving (Show, Read)