--- a/gameServer/Actions.hs	Sat Nov 03 23:28:42 2012 +0400
+++ b/gameServer/Actions.hs	Sun Nov 04 21:28:03 2012 +0400
@@ -395,6 +395,7 @@
             teams = Prelude.filter (\t -> teamName /= teamname t) $ teams r
             , gameInfo = liftM (\g -> g{leftTeams = teamName : leftTeams g}) $ gameInfo r
             })
+        : SendUpdateOnThisRoom
         : AnswerClients chans ["REMOVE_TEAM", teamName]
         : [SendTeamRemovalMessage teamName | inGame]