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.
actual fix
authorsheepluva
Wed, 22 Jan 2014 18:46:15 +0100
changeset 10053 8a56c23f94c5
parent 10052 6748866c94ee
child 10054 6357b3099e1f
actual fix
gameServer/EngineInteraction.hs file | annotate | diff | comparison | revisions 
--- a/gameServer/EngineInteraction.hs	Wed Jan 22 15:53:36 2014 +0100
+++ b/gameServer/EngineInteraction.hs	Wed Jan 22 18:46:15 2014 +0100
@@ -86,7 +86,7 @@
         mapgen = mParams Map.! "MAPGEN"
         mapgenSpecific = case mapgen of
             "1" -> [eml ["e$maze_size ", head $ prms Map.! "MAZE_SIZE"]]
-            "2" -> let d = head $ prms Map.! "DRAWNMAP" in if BW.null d then [] else drawnMapData d
+            "2" -> let d = head $ prms Map.! "DRAWNMAP" in if BW.length d <= 1 then [] else drawnMapData d
             _ -> []
         gameFlags :: Word32
         gameFlags = foldl (\r (b, f) -> if b == "false" then r else r .|. f) 0 $ zip scheme gameFlagConsts
hedgewars