diff -r c7d258a4358e -r 6b074de32bea gameServer/HWProtoInRoomState.hs --- a/gameServer/HWProtoInRoomState.hs Thu Nov 01 08:59:16 2012 -0400 +++ b/gameServer/HWProtoInRoomState.hs Fri Nov 02 00:09:40 2012 +0400 @@ -72,6 +72,7 @@ [Warning "restricted"] else [ModifyRoom (\r -> r{teams = teams r ++ [newTeam ci clNick r teamColor]}), + SendUpdateOnThisRoom, ModifyClient (\c -> c{teamsInGame = teamsInGame c + 1, clientClan = Just teamColor}), AnswerClients clChan ["TEAM_ACCEPTED", tName], AnswerClients othChans $ teamToNet $ newTeam ci clNick rm teamColor, @@ -106,6 +107,7 @@ [ProtocolError "Not team owner!"] else [RemoveTeam tName, + SendUpdateOnThisRoom, ModifyClient (\c -> c{ teamsInGame = teamsInGame c - 1, @@ -194,6 +196,7 @@ } ) , AnswerClients chans ["RUN_GAME"] + , SendUpdateOnThisRoom , AnswerClients chans $ "CLIENT_FLAGS" : "+g" : nicks , ModifyRoomClients (\c -> c{isInGame = True}) ]