Cleanup

src/Dodge/Default/Weapon.hs

@@ -65,6 +65,7 @@ defaultlUse = LeftUse
     { _lUse = \_ _ -> id
     , _useDelay = FixedRate {_rateMax = 8, _rateTime = 0}
     , _useHammer  = NoHammer
+    , _eqSite = GoesOnSpecial
     }
 
 luseInstantNoH :: (Item -> Creature -> World -> World) -> ItemUse
@@ -72,6 +73,7 @@ luseInstantNoH f = LeftUse
     { _lUse = f
     , _useDelay = NoDelay
     , _useHammer  = NoHammer
+    , _eqSite = GoesOnSpecial
     }
 defaultAimParams :: AimParams
 defaultAimParams = AimParams