--- a/gameServer/HWProtoLobbyState.hs Thu Jun 24 19:52:04 2010 +0400
+++ b/gameServer/HWProtoLobbyState.hs Fri Jun 25 10:05:42 2010 +0400
@@ -4,7 +4,7 @@
import qualified Data.Map as Map
import qualified Data.IntSet as IntSet
import qualified Data.Foldable as Foldable
-import Maybe
+import Data.Maybe
import Data.List
import Data.Word
import Control.Monad.Reader
@@ -44,7 +44,7 @@
name room,
showB $ playersIn room,
showB $ length $ teams room,
- nick $ irnc `client` (masterID room),
+ nick $ irnc `client` masterID room,
head (Map.findWithDefault ["+gen+"] "MAP" (params room)),
head (Map.findWithDefault ["Default"] "SCHEME" (params room)),
head (Map.findWithDefault ["Default"] "AMMO" (params room))