author | unc0rr |
Wed, 31 Oct 2012 16:52:31 +0400 | |
changeset 7898 | ba735701ce7f |
parent 7897 | 5e7c0810f365 |
child 7906 | aea103d58d83 |
child 7907 | 3b44ecf91928 |
--- 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