gameServer/CoreTypes.hs
changeset 8428 73ab5a17ee55
parent 8372 3c193ec03e09
child 8431 74c2c95ab07b
--- 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)