Fix scroll selection of floor items and buttons

2022-12-25 23:37:42 +00:00
parent 2ae7f2bbc1
commit d2141d90ae
13 changed files with 75 additions and 126 deletions
@@ -13,7 +13,8 @@ import Geometry.Data

 data HUDElement
    = DisplayInventory 
-        { _subInventory :: SubInventory}
+        { _subInventory :: SubInventory
+        }
    | DisplayCarte
    deriving (Eq, Ord, Show, Read) --Generic, Flat)