gameServer/HWProtoLobbyState.hs
changeset 4668 9d9523deb5e0
parent 4570 fa19f0579083
child 4904 0eab727d4717
--- a/gameServer/HWProtoLobbyState.hs	Fri Dec 24 20:25:03 2010 +0100
+++ b/gameServer/HWProtoLobbyState.hs	Fri Dec 24 22:39:20 2010 +0300
@@ -102,7 +102,7 @@
         toAnswer (paramName, paramStrs) = AnswerThisClient $ "CFG" : paramName : paramStrs
         
         answerFullConfig = map toAnswer ((Data.List.reverse . Data.List.sort $ leftConfigPart) ++ rightConfigPart)
-        (leftConfigPart, rightConfigPart) = partition (\(p, _) -> p == "MAP" || p == "MAPGEN") (Map.toList $ params jRoom)
+        (leftConfigPart, rightConfigPart) = partition (\(p, _) -> p == "MAP" || p == "MAPGEN" || p == "SCHEME") (Map.toList $ params jRoom)
 
         watchRound = if not $ gameinprogress jRoom then
                     []