Improve gibs

2026-04-03 16:47:06 +01:00
parent e8069073b5
commit 2b2ac53466
3 changed files with 282 additions and 268 deletions
@@ -133,7 +133,7 @@ corpseOrGib cr = case cr ^? crDamage . to maxDamageType . _Just . _1 of
            . dodeathsound PoisonDeath
    Just PhysicalDamage
        | _crPain cr > 200 ->
-            addCrGibs cr
+            makeCrGibs cr
                . sethp CrIsGibs
                . dodeathsound GibsDeath
    _ ->