Start adding mouse control of inventory

2024-10-15 23:26:08 +01:00
parent e745238b8f
commit cf0873d73b
18 changed files with 333 additions and 269 deletions
@@ -21,6 +21,9 @@ data HUDElement

 data SubInventory
    = NoSubInventory
+        { _nsSelected :: Maybe (Int,Int) 
+        , _nsMouseOver :: Maybe Int
+        }
    | ExamineInventory
    | CombineInventory { _ciSections :: SelectionSections CombinableItem }
    | LockedInventory