Implement combining of items

2021-12-03 01:56:23 +00:00
parent 8b8d75b016
commit bebc73882a
13 changed files with 190 additions and 56 deletions
@@ -167,7 +167,7 @@ data MenuOption
 data InventoryMode
    = TopInventory
    | TweakInventory
-    | CombineInventory
+    | CombineInventory {_combineInvSel :: Maybe Int}
    | InspectInventory
    | LockedInventory
  deriving (Eq, Ord, Show)
@@ -940,3 +940,4 @@ makeLenses ''LSParam
 makeLenses ''ItemParams
 makeLenses ''ItemTweaks
 makeLenses ''Maybe'
+makeLenses ''InventoryMode