Remove creature records

src/Dodge/Room/Boss.hs

@@ -68,7 +68,8 @@ armouredChasers = do
     treeFromPost [corridor, corridor] <$> (randomMediumRoom <&> rmPmnts %~ (++ theCrits))
   where
     cs =
-        (armourChaseCrit & crState . csDropsOnDeath .~ DropSpecific [0]) :
+        --(armourChaseCrit & crState . csDropsOnDeath .~ DropSpecific [0]) :
+        armourChaseCrit :
         replicate 4 chaseCrit
 
 randomMediumRoom :: RandomGen g => State g Room

src/Dodge/Room/NoNeedWeapon.hs

@@ -26,7 +26,7 @@ centerVaultExplosiveExit = do
             [ sPS (V2 0 110) 0 $ PutCrit explosiveBarrel
             , sPS (V2 5 115) 0 $ PutCrit explosiveBarrel
             , sPS (V2 0 120) 0 $ PutCrit explosiveBarrel
-            , sPS (V2 0 0) 0 $ PutCrit (cr & crState . csDropsOnDeath .~ DropAll)
+            , sPS (V2 0 0) 0 $ PutCrit cr
             ]
     centerVaultRoom 120 120 50 <&> rmPmnts %~ (extraPS ++)