Creature springs checks for heights

2026-04-04 08:33:09 +01:00
parent 615295ca3e
commit def204d211
8 changed files with 96 additions and 66 deletions
@@ -139,6 +139,5 @@ hasAutoDoorBody :: Creature -> Bool
 hasAutoDoorBody cr = case cr ^. crHP of
    HP {} -> True
    CrIsCorpse {} -> True
-    CrIsGibs -> False
-    CrIsPitted -> False
+    CrDestroyed {} -> False