Magnets

2021-12-08 22:01:25 +00:00
parent a9139db0a8
commit eeda4f3e39
12 changed files with 98 additions and 36 deletions
@@ -318,6 +318,8 @@ data ItemUse
        , _useHammer    :: HammerType
        }
    | EquipUse
+        { _eqUse :: Creature -> Int -> World -> World
+        }
    | NoUse
 _itUseAimStance :: Item -> AimStance
 _itUseAimStance = _aimStance . _useAim . _itUse