Start collapsing manipulated item code with selection code
This commit is contained in:
@@ -1421,7 +1421,8 @@ useInventoryPath pt i ip loc cr w = case ip of
|
||||
guard $ i `IM.member` (cr ^. crInv . unNIntMap)
|
||||
return $ w & cWorld . lWorld . delayedEvents .:~ (1, UseInvItem i pt)
|
||||
RELCURS -> fromMaybe w $ do
|
||||
j <- w ^? hud . manObject . imSelectedItem . unNInt
|
||||
Sel 0 j <- w ^? hud .diSelection._Just
|
||||
--revise2 j <- w ^? hud . manObject . imSelectedItem . unNInt
|
||||
--revise1 j <- cr ^? crManipulation . manObject . imSelectedItem . unNInt
|
||||
guard $ (i + j) `IM.member` (cr ^. crInv . unNIntMap)
|
||||
return $ w & cWorld . lWorld . delayedEvents .:~ (1, UseInvItem (i + j) pt)
|
||||
|
||||
Reference in New Issue
Block a user