Allow filtering of combinations with mouse click on inventory

2024-11-04 00:07:37 +00:00
parent adca54c1ef
commit fafef1275b
11 changed files with 125 additions and 80 deletions
@@ -105,7 +105,7 @@ getRootItemBounds i inv = do

 drawDIMouseOver :: World -> Picture
 drawDIMouseOver w = fromMaybe mempty $ do
-    (j, i) <- w ^? hud . hudElement . subInventory . nsMouseOver . _Just
+    (j, i) <- w ^? hud . hudElement . diMouseOver . _Just
    sss <- w ^? hud . hudElement . diSections
    let idp = invDisplayParams w
    return . color (withAlpha 0.2 white) $ selSecDrawCursorAt 15 idp curs sss (j, i)