Separate selected item from extra selected items
This commit is contained in:
+21
-6
@@ -1,15 +1,30 @@
|
||||
/home/justin/Haskell/loop/src/Dodge/Update/Input/InGame.hs:123:1-15: warning: [-Wunused-top-binds]
|
||||
/home/justin/Haskell/loop/src/Dodge/Update/Input/InGame.hs:124:1-15: warning: [-Wunused-top-binds]
|
||||
Defined but not used: ‘tryDropSelected’
|
||||
|
|
||||
123 | tryDropSelected w = do
|
||||
124 | tryDropSelected w = do
|
||||
| ^^^^^^^^^^^^^^^
|
||||
/home/justin/Haskell/loop/src/Dodge/Update/Input/InGame.hs:130:1-17: warning: [-Wunused-top-binds]
|
||||
/home/justin/Haskell/loop/src/Dodge/Update/Input/InGame.hs:131:1-17: warning: [-Wunused-top-binds]
|
||||
Defined but not used: ‘tryPickupSelected’
|
||||
|
|
||||
130 | tryPickupSelected w = do
|
||||
131 | tryPickupSelected w = do
|
||||
| ^^^^^^^^^^^^^^^^^
|
||||
/home/justin/Haskell/loop/src/Dodge/Update/Input/InGame.hs:134:19: warning: [-Wunused-matches]
|
||||
/home/justin/Haskell/loop/src/Dodge/Update/Input/InGame.hs:135:19: warning: [-Wunused-matches]
|
||||
Defined but not used: ‘x’
|
||||
|
|
||||
134 | OverInvDrag 3 x <- w ^? input . mouseContext
|
||||
135 | OverInvDrag 3 x <- w ^? input . mouseContext
|
||||
| ^
|
||||
/home/justin/Haskell/loop/src/Dodge/Update/Input/InGame.hs:209:9: warning: [-Wunused-matches]
|
||||
Defined but not used: ‘j’
|
||||
|
|
||||
209 | (i, j) <- w ^? hud . hudElement . diSelection . _Just
|
||||
| ^
|
||||
/home/justin/Haskell/loop/src/Dodge/Update/Input/InGame.hs:227:1-12: warning: [-Wunused-top-binds]
|
||||
Defined but not used: ‘dragInvItems’
|
||||
|
|
||||
227 | dragInvItems j is cfig mpos ldp sss w
|
||||
| ^^^^^^^^^^^^
|
||||
/home/justin/Haskell/loop/src/Dodge/Update/Input/InGame.hs:297:1-13: warning: [-Wunused-top-binds]
|
||||
Defined but not used: ‘shiftInvItems’
|
||||
|
|
||||
297 | shiftInvItems j xs cfig mpos ldp sss w = case inverseSelBoundaryUp cfig ldp sss mpos of
|
||||
| ^^^^^^^^^^^^^
|
||||
|
||||
Reference in New Issue
Block a user