changeset 7898 | ba735701ce7f |
parent 7775 | 835ad028fb66 |
child 7921 | 6b074de32bea |
--- a/gameServer/Actions.hs Tue Oct 30 12:50:50 2012 +0100 +++ b/gameServer/Actions.hs Wed Oct 31 16:52:31 2012 +0400 @@ -211,7 +211,7 @@ rnc <- gets roomsClients io $ do - modifyClient rnc (\cl -> cl{teamsInGame = 0, isReady = False, isMaster = False}) ci + modifyClient rnc (\cl -> cl{teamsInGame = 0, isReady = False, isMaster = False, isInGame = False}) ci modifyRoom rnc (\r -> r{playersIn = playersIn r + 1}) ri moveClientToRoom rnc ri ci