Mercurial Mercurial > hedgewars / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Pass SCHEME before AMMO
authorunc0rr
Fri, 24 Dec 2010 22:39:20 +0300
changeset 4668 9d9523deb5e0
parent 4667 436b3aafcb0c
child 4669 296dbccdf376
Pass SCHEME before AMMO
gameServer/HWProtoLobbyState.hs file | annotate | diff | comparison | revisions 
--- 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
                     []
hedgewars