Data-ify item drawing

2022-07-11 00:33:59 +01:00
parent 75cd15c240
commit ad84e69d05
15 changed files with 102 additions and 81 deletions
@@ -535,7 +535,7 @@ data ItemConsumption
 data Item = Item
    { _itConsumption    :: ItemConsumption
    , _itUse        :: ItemUse
-    , _itEquipPict  :: Creature -> Item -> SPic
+--    , _itEquipPict  :: Creature -> Item -> SPic
    , _itType       :: ItemType
    , _itAttachment :: ItAttachment
    , _itID         :: Maybe Int