Reify debug booleans

2022-06-17 21:34:00 +01:00
parent 261bb0bb6b
commit 5053590792
10 changed files with 73 additions and 49 deletions
@@ -79,7 +79,7 @@ basicCrShape cr

 creatureDisplayText :: Configuration -> World -> Creature -> Picture
 creatureDisplayText cfig w cr 
-  | not (_debug_cr_awareness cfig) = []
+  | not (debugOn Cr_awareness cfig) = []
  | otherwise
    = setLayer DebugLayer 
    . setDepth 20