Decouple selection section inventory position

2024-10-24 14:55:51 +01:00
parent 81f4f38166
commit 388064895f
17 changed files with 304 additions and 261 deletions
@@ -73,7 +73,7 @@ setInvPosFromSS w =
  where
    thesel = fromMaybe SelNothing $ do
        sss <- w ^? hud . hudElement . diSections
-        (i, j) <- sss ^? sssExtra . sssSelPos . _Just
+        (i, j) <- w ^? hud . hudElement . diSelection . _Just
        case i of
            (-1) -> Just SortInventory
            0 -> do