Decouple selection section inventory position

2024-10-24 14:55:51 +01:00
parent 81f4f38166
commit 388064895f
17 changed files with 304 additions and 261 deletions
@@ -3,3 +3,13 @@
    |
 357 | shiftInvItems x w = w
    |               ^
+/home/justin/Haskell/loop/src/Dodge/Inventory/Location.hs:13:1-31: warning: [-Wunused-imports]
+    The import of ‘Dodge.Data.SelectionList’ is redundant
+   |
+13 | import Dodge.Data.SelectionList
+   | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Inventory/Location.hs:75:9-11: warning: [-Wunused-matches]
+    Defined but not used: ‘sss’
+   |
+75 |         sss <- w ^? hud . hudElement . diSections
+   |         ^^^