Cleanup

2022-12-27 14:46:13 +00:00
parent 85738adff1
commit 9ada489993
4 changed files with 62 additions and 56 deletions
@@ -20,8 +20,8 @@ data HUDElement

 data SubInventory
    = NoSubInventory
-    | ExamineInventory {_examineInvSel :: Maybe Int}
-    | CombineInventory {_combineInvSel :: Maybe Int}
+    | ExamineInventory {_subInvSel :: Maybe Int}
+    | CombineInventory {_subInvSel :: Maybe Int}
    | LockedInventory
    | DisplayTerminal {_termID :: Int}
    deriving (Eq, Ord, Show, Read) --Generic, Flat)