changeset 8514 | 896b283f41a2 |
parent 8510 | 0a39b2f9c748 |
child 8519 | 98e2dbdda8c0 |
--- a/gameServer/Actions.hs Mon Feb 18 22:21:31 2013 +0400 +++ b/gameServer/Actions.hs Mon Feb 18 22:47:42 2013 +0400 @@ -220,7 +220,7 @@ rnc <- gets roomsClients io $ do - modifyClient rnc (\cl -> cl{teamsInGame = 0, isReady = False, isMaster = False, isInGame = False}) ci + modifyClient rnc (\cl -> cl{teamsInGame = 0, isReady = False, isMaster = False, isInGame = False, clientClan = Nothing}) ci modifyRoom rnc (\r -> r{playersIn = playersIn r + 1}) ri moveClientToRoom rnc ri ci