Distinguish between selected item and root-selected item

2024-09-21 21:59:53 +01:00
parent 2154abfb1d
commit 31b5db6e9e
33 changed files with 313 additions and 281 deletions
@@ -247,7 +247,7 @@ toggleTweakInv w = case w ^? hud . hudElement . subInventory of
    _ -> w & thepointer .~ ExamineInventory mi
  where
    thepointer = hud . hudElement . subInventory
-    mi = 0 <$ (yourItem w >>= (^? itTweaks . tweakParams . ix 0))
+    mi = 0 <$ (yourSelectedItem w >>= (^? itTweaks . tweakParams . ix 0))

 tryCombine :: SelectionSections CombinableItem -> World -> World
 tryCombine sss w = fromMaybe w $ do