Allow for item use when not root

2024-12-20 16:07:58 +00:00
parent 3a72bd366f
commit d9aaa8cc05
26 changed files with 436 additions and 493 deletions
@@ -5,7 +5,6 @@ module Dodge.Creature.PistolCrit (
 import Control.Lens
 import Dodge.Data.Creature
 import Dodge.Default
-import Dodge.Item.Consumable
 import Dodge.Item.Held.Stick
 import qualified IntMapHelp as IM
 import Picture
@@ -13,7 +12,7 @@ import Picture
 pistolCrit :: Creature
 pistolCrit =
    defaultCreature
-        { _crInv = IM.fromList [(0, pistol), (1, medkit 100)]
+        { _crInv = IM.fromList [(0, pistol)]
        , _crRad = 10
        , _crHP = 500
        }