Cleanup

2025-06-14 23:16:29 +01:00
parent 02498e5abb
commit 078a3cc7ea
19 changed files with 29 additions and 60 deletions
@@ -93,7 +93,7 @@ deadRot cr = overPosSH (Q.rotateToZ d)
        maybe
            (V3 1 0 0)
            (addZ 0 . unitVectorAtAngle . subtract (_crDir cr + pi))
-            (damageDirection . _csDamage $ _crState cr)
+            (damageDirection $ _crDamage cr)

 scalp :: Creature -> Shape
 {-# INLINE scalp #-}