Prettify saved config

2022-04-11 08:47:30 +01:00
parent 3592245b46
commit ab2408b480
6 changed files with 14 additions and 6 deletions
@@ -122,9 +122,10 @@ crDisplayInfo cfig w cr

 drawCrInfo :: Configuration -> World -> Picture
 drawCrInfo cfig w
-    = setLayer FixedCoordLayer 
-    $ renderInfoListsAt (2*hw - 200) 0 cfig w
-    $ mapMaybe (crDisplayInfo cfig w) $ IM.elems $ _creatures w
+--    | _debug_cr_awareness cfig = setLayer FixedCoordLayer 
+--        $ renderInfoListsAt (2*hw - 200) 0 cfig w
+--        $ mapMaybe (crDisplayInfo cfig w) $ IM.elems $ _creatures w
+    | otherwise = mempty
  where
    hw = halfWidth cfig