Allow for equipment items to set a minimum view distance

2022-06-05 01:50:18 +01:00
parent 5e144b1cd5
commit 65fcea0f50
13 changed files with 76 additions and 61 deletions
@@ -164,13 +164,7 @@ defaultEquipment = Item
    , _itInvPos = Nothing
    , _itDimension = defItDimCol yellow
    , _itConsumption = NoConsumption
-    , _itUse = EquipUse 
-        {_eqUse = \_ _ -> id
-        ,_eqOnEquip = \_ _ -> id
-        ,_eqOnRemove = \_ _ -> id
-        ,_eqSite = GoesOnSpecial
-        ,_eqParams = NoEquipParams
-        }
+    , _itUse = EquipUse defaultEquip
    , _itAttachment = NoItAttachment
    , _itParams = NoParams
    , _itTweaks = NoTweaks