Cleanup barrels

2025-06-14 23:08:11 +01:00
parent 5286485d62
commit 02498e5abb
14 changed files with 352 additions and 353 deletions
@@ -21,8 +21,8 @@ barrel =
        , _crType = BarrelCrit PlainBarrel
        , _crState =
            defaultState
-                { _csSpState = Barrel []
-                }
+--                { _csSpState = Barrel []
+--                }
        , _crInv = IM.empty -- IM.fromList [(0,frontArmour)]
        }

@@ -30,11 +30,11 @@ explosiveBarrel :: Creature
 explosiveBarrel =
    defaultInanimate
        { _crHP = 400
-        , _crType = BarrelCrit ExplosiveBarrel
+        , _crType = BarrelCrit (ExplosiveBarrel [])
        , _crState =
            defaultState
-                { _csSpState = Barrel []
-                }
+--                { _csSpState = Barrel []
+--                }
        , _crInv = IM.empty -- IM.fromList [(0,frontArmour)]
        }
 --        & crMaterial .~ Crystal