Cleanup
This commit is contained in:
@@ -42,7 +42,7 @@ drawGib x pr = flesh <> skin
|
||||
|
||||
|
||||
addCrGibs :: Creature -> World -> World
|
||||
addCrGibs cr w = case damageDirection $ _crDamage $ _crState cr of
|
||||
addCrGibs cr w = case damageDirection $ _csDamage $ _crState cr of
|
||||
Nothing -> w
|
||||
& addGibAt 25 (_skinHead skin) cpos
|
||||
& addGibsAt 3 7 (_skinLower skin) cpos
|
||||
|
||||
Reference in New Issue
Block a user