Move towards selection section inventory management

2023-02-14 23:25:09 +00:00
parent 9dd4c53316
commit ff5fa6321a
6 changed files with 252 additions and 66 deletions
@@ -145,8 +145,10 @@ updateUseInput u = case u ^? uvScreenLayers . _head of
        Just (DisplayTerminal tmid) | inTermFocus (_uvWorld u) -> updateKeysInTerminal tmid u
        Just (CombineInventory sm)
            | inregex sm -> doSubInvRegexInput u
+        _ | ininvregex -> doInvRegexInput u
        _ -> M.foldlWithKey' updateKeyInGame u pkeys
  where
+    ininvregex = False
    inregex sm = fromMaybe False $ do
        i <- sm ^? smSelPos . _Just
        si <- sm ^? smShownItems . ix i