Implement simple indenting in selection menu

This commit is contained in:
2024-09-12 18:14:52 +01:00
parent 4dedba8d30
commit e69abf1715
8 changed files with 226 additions and 217 deletions
+1 -50
View File
@@ -1,50 +1 @@
/home/justin/Haskell/loop/src/Dodge/Render/List.hs:80:1-21: warning: [-Wunused-top-binds]
Defined but not used: drawTreeYgapScaleYoff
|
80 | drawTreeYgapScaleYoff ygap s i = undefined
| ^^^^^^^^^^^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/Render/List.hs:80:23-26: warning: [-Wunused-matches]
Defined but not used: ygap
|
80 | drawTreeYgapScaleYoff ygap s i = undefined
| ^^^^
/home/justin/Haskell/loop/src/Dodge/Render/List.hs:80:28: warning: [-Wunused-matches]
Defined but not used: s
|
80 | drawTreeYgapScaleYoff ygap s i = undefined
| ^
/home/justin/Haskell/loop/src/Dodge/Render/List.hs:80:30: warning: [-Wunused-matches]
Defined but not used: i
|
80 | drawTreeYgapScaleYoff ygap s i = undefined
| ^
/home/justin/Haskell/loop/src/Dodge/DisplayInventory.hs:12:1-28: warning: [-Wunused-imports]
The import of Dodge.Data.DoubleTree is redundant
|
12 | import Dodge.Data.DoubleTree
| ^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/DisplayInventory.hs:15:1-48: warning: [-Wunused-imports]
The qualified import of Data.IntMap.Merge.Strict is redundant
|
15 | import qualified Data.IntMap.Merge.Strict as MIM
| ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/DisplayInventory.hs:27:1-25: warning: [-Wunused-imports]
The import of Dodge.Item.Grammar is redundant
|
27 | import Dodge.Item.Grammar
| ^^^^^^^^^^^^^^^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/DisplayInventory.hs:119:5-13: warning: [-Wunused-local-binds]
Defined but not used: addindent
|
119 | addindent x y = y & siPictures %~ map (x ++)
| ^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/DisplayInventory.hs:254:1-23: warning: [-Wunused-top-binds]
Defined but not used: displaySelectionSection
|
254 | displaySelectionSection ss = undefined
| ^^^^^^^^^^^^^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/DisplayInventory.hs:254:25-26: warning: [-Wunused-matches]
Defined but not used: ss
|
254 | displaySelectionSection ss = undefined
| ^^
All good (615 modules, at 18:14:34)