Cleanup

2022-06-19 22:46:50 +01:00
parent b3c6944693
commit 8d457033a2
17 changed files with 33 additions and 33 deletions
@@ -92,7 +92,7 @@ followImpulse cr w imp = case imp of
    cid  = _crID cr
    posFromID cid' = _crPos $ _creatures w IM.! cid'
    rr a = randomR (-a,a) $ _randGen w
-    hitCr i = (creatures . ix i . crState . crDamage 
+    hitCr i = (creatures . ix i . crState . csDamage 
        .:~ Damage BLUNT 100 cpos (posFromID i) (posFromID i) NoDamageEffect
        )
        . soundStart (CrSound cid) cpos hitS Nothing