# HG changeset patch
# User unc0rr
# Date 1293219560 -10800
# Node ID 9d9523deb5e04b1b08a868099772a539d7b7954e
# Parent  436b3aafcb0c41318accc758d2dccc93ee8812b8
Pass SCHEME before AMMO

diff -r 436b3aafcb0c -r 9d9523deb5e0 gameServer/HWProtoLobbyState.hs
--- 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
                     []