Rethink selection lists as intmaps

2023-01-15 23:17:47 +00:00
parent 17734738f6
commit 048135c370
17 changed files with 245 additions and 93 deletions
@@ -138,7 +138,7 @@ updateUseInput u = case u ^? uvScreenLayers . _head of
        optionScreenUpdate screen mop flag ldps sellist u
    _ -> case u ^? uvWorld . hud . hudElement . subInventory of
        Just (DisplayTerminal tmid) | inTermFocus (_uvWorld u) -> updateKeysInTerminal tmid u
-        Just (CombineInventory _ _ True) -> doSubInvRegexInput u
+        Just (CombineInventory SelectionIntMap {_smRegexInput=True}) -> doSubInvRegexInput u
        _ -> M.foldlWithKey' updateKeyInGame u pkeys
  where
    pkeys = u ^. uvWorld . input . pressedKeys