Allow for scrolling in combine regex

2023-02-13 23:15:34 +00:00
parent 8b39a99194
commit 9dd4c53316
10 changed files with 46 additions and 37 deletions
@@ -114,6 +114,6 @@ enterCombineInv w = w & hud . hudElement . subInventory .~ CombineInventory sm
    sm = initialSelPos $ SelectionIntMap
        { _smItems = combineList w
        , _smSelPos = Nothing
-        , _smRegex = NoSMRegex
+        , _smRegex = Nothing
        , _smShownItems = IM.fromAscList $ zip [0..] (combineList w)
        }