diff -r fc39fe044a4f -r ec41194d4444 gameServer/Actions.hs --- a/gameServer/Actions.hs Tue Jan 22 00:04:09 2013 +0400 +++ b/gameServer/Actions.hs Tue Jan 22 00:24:44 2013 +0400 @@ -383,7 +383,7 @@ rnc <- gets roomsClients ri <- clientRoomA gi <- io $ room'sM rnc gameInfo ri - when (isJust gi && 0 == teamsInGameNumber (fromJust gi)) $ + when (0 == teamsInGameNumber (fromJust gi)) $ processAction FinishGame where rmTeamMsg = toEngineMsg $ 'F' `B.cons` teamName