--- a/gameServer/HWProtoInRoomState.hs	Tue Jul 10 11:08:35 2012 +0200
+++ b/gameServer/HWProtoInRoomState.hs	Tue Jul 10 11:09:38 2012 +0200
@@ -79,10 +79,10 @@
         hhsList [_] = error "Hedgehogs list with odd elements number"
         hhsList (n:h:hhs) = HedgehogInfo n h : hhsList hhs
         newTeamHHNum r = min 4 (canAddNumber r)
-        maxTeams r 
+        maxTeams r
             | roomProto r < 38 = 6
             | otherwise = 8
-                
+
 
 handleCmd_inRoom ["REMOVE_TEAM", tName] = do
         (ci, _) <- ask
@@ -171,7 +171,7 @@
     cl <- thisClient
     rm <- thisRoom
     chans <- roomClientsChans
-    
+
     let allPlayersRegistered = all ((<) 0 . B.length . webPassword . client rnc . teamownerId) $ teams rm
 
     if isMaster cl && playersIn rm == readyPlayers rm && not (isJust $ gameInfo rm) then
@@ -247,7 +247,7 @@
     rs <- allRoomInfos
     rm <- thisRoom
     chans <- sameProtoChans
-    
+
     return $
         if not $ isMaster cl then
             [ProtocolError "Not room master"]