diff -r 803b277e4894 -r 3f21a9dc93d0 gameServer/Actions.hs --- a/gameServer/Actions.hs Sat Mar 06 10:54:24 2010 +0000 +++ b/gameServer/Actions.hs Sat Mar 06 10:59:20 2010 +0000 @@ -312,7 +312,7 @@ processAction (clID, serverInfo, clients, rooms) (RemoveTeam teamName) = do - newRooms <- if not $ gameinprogress room then + newRooms <- if not $ gameinprogress room then do processAction (clID, serverInfo, clients, rooms) $ AnswerOthersInRoom ["REMOVE_TEAM", teamName] return $