Work on weapon attachments

2023-09-25 13:38:47 +01:00
parent f9c6769262
commit 0a7f5079ad
12 changed files with 28 additions and 34 deletions
@@ -18,13 +18,12 @@ import ShapePicture
 itemSPic :: Item -> SPic
 itemSPic it =
    M.foldMapWithKey (modulesSPic it) (_iyModules $ _itType it) <> case it ^. itType . iyBase of
-        NoItemType -> over _1 (colorSH magenta) defSPic
        CRAFT _ -> defSPic
        HELD ht -> heldItemSPic ht it
        LEFT lt -> leftItemSPic lt it
        EQUIP et -> equipItemSPic et it
        AMMO {} -> defSPic
-        Consumable{} -> defSPic
+        CONSUMABLE{} -> defSPic
        ATTACH {} -> defSPic

 equipItemSPic :: EquipItemType -> Item -> SPic