Add 8-way cardinal/intercardinal datatype

2024-10-18 12:39:46 +01:00
parent d256bc0443
commit 8b6f5529ff
12 changed files with 267 additions and 157 deletions
@@ -161,7 +161,10 @@ defaultHUD =
 defaultDisplayInventory :: HUDElement
 defaultDisplayInventory =
    DisplayInventory
-        { _subInventory = NoSubInventory {_nsSelected = Just (0,2), _nsMouseOver = Just (0,3)}
+        { _subInventory = NoSubInventory 
+            {_nsSelected = MouseInvChosen (0,0) (0,2)
+            , _nsMouseOver = Just (0,3)
+            }
        , _diSections = defaultInvSections
        }