--- a/gameServer/Actions.hs	Sun Nov 04 17:05:15 2012 -0500
+++ b/gameServer/Actions.hs	Sun Nov 04 17:05:54 2012 -0500
@@ -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]