# HG changeset patch # User unc0rr # Date 1420446904 -10800 # Node ID fcef7d62d3c47ddf828332a5b5f8ba4dcc6f3cb1 # Parent 0f3a0f117810ff16aa895774dbaf809e2caaddef Eh, faulty check diff -r 0f3a0f117810 -r fcef7d62d3c4 gameServer/EngineInteraction.hs --- a/gameServer/EngineInteraction.hs Mon Jan 05 01:38:46 2015 +0300 +++ b/gameServer/EngineInteraction.hs Mon Jan 05 11:35:04 2015 +0300 @@ -117,7 +117,7 @@ keys2 = Set.fromList ["AMMO", "SCHEME", "SCRIPT", "THEME"] sane = Set.null (keys1 Set.\\ Map.keysSet mParams) && Set.null (keys2 Set.\\ Map.keysSet prms) - && (not . null . drop 40 $ scheme) + && (not . null . drop 41 $ scheme) && (not . null . tail $ prms Map.! "AMMO") mapGenTypes = ["+rnd+", "+maze+", "+drawn+"] maybeScript = let s = head . fromMaybe ["Normal"] $ Map.lookup "SCRIPT" prms in if s == "Normal" then [] else [eml ["escript Scripts/Multiplayer/", s, ".lua"]]