Allow dragging of selected items in inventory
This commit is contained in:
+20
-1
@@ -1 +1,20 @@
|
||||
All good (597 modules, at 12:38:41)
|
||||
/home/justin/Haskell/loop/src/Dodge/Update.hs:319:30-33: warning: [-Wunused-matches]
|
||||
Defined but not used: ‘ssel’
|
||||
|
|
||||
319 | Just (MouseInvChosen ssel esel) -> w
|
||||
| ^^^^
|
||||
/home/justin/Haskell/loop/src/Dodge/Update.hs:319:35-38: warning: [-Wunused-matches]
|
||||
Defined but not used: ‘esel’
|
||||
|
|
||||
319 | Just (MouseInvChosen ssel esel) -> w
|
||||
| ^^^^
|
||||
/home/justin/Haskell/loop/src/Dodge/Update.hs:341:38: warning: [-Wunused-matches]
|
||||
Defined but not used: ‘k’
|
||||
|
|
||||
341 | shiftInvItemsUp (_,i) (_,j) (Just (_,k)) w = w
|
||||
| ^
|
||||
/home/justin/Haskell/loop/src/Dodge/Update.hs:351:40: warning: [-Wunused-matches]
|
||||
Defined but not used: ‘k’
|
||||
|
|
||||
351 | shiftInvItemsDown (_,i) (_,j) (Just (_,k)) w = w
|
||||
| ^
|
||||
|
||||
Reference in New Issue
Block a user