Move inventory filter to different section of selection list

2023-02-17 10:35:59 +00:00
parent 4afc216b25
commit 93dfc2a67c
8 changed files with 111 additions and 102 deletions
@@ -21,12 +21,7 @@ inInvRegex  :: World -> Bool
 inInvRegex w = fromMaybe False $ do
        sss <- w ^? hud . hudElement . diSections
        i <- sss ^? sssSelPos . _Just
-        ss <- sss ^? sssSections . ix i
-        j <- ss ^? ssCursor . _Just . scurSel
-        si <- ss ^? ssItems . ix j
-        return $ case si of
-            SelectionRegex {} -> True
-            _ -> False
+        return $ i == (-1)

 inSubInvRegex  :: World -> Bool
 inSubInvRegex w = fromMaybe False $ do