Hlint pass

2025-08-19 18:05:05 +01:00
parent 5ccbfa1f91
commit e1cfe7e163
10 changed files with 16 additions and 17 deletions
@@ -61,7 +61,7 @@ crUpdate' f cr =
        . g
        . updateWalkCycle cid
  where
-    cid = (cr ^. crID)
+    cid = cr ^. crID
    g w' = maybe id f (w' ^? cWorld . lWorld . creatures . ix cid) w'

 checkDeath :: Int -> World -> World