Refactor

2025-01-06 12:06:37 +00:00
parent bcc36901aa
commit f3f365bbe9
4 changed files with 42 additions and 35 deletions
@@ -70,7 +70,7 @@ updateCombineSections w cfig =

 regexCombs :: IM.IntMap Item -> SelectionItem CombinableItem -> String -> Bool
 regexCombs inv ci = \case
-    '<' : str -> any (g str) (_ciInvIDs $ _siPayload ci)
+    '#' : str -> any (g str) (_ciInvIDs $ _siPayload ci)
    str -> (regexList str . _siPictures) ci
  where
    g str i = maybe False (regexList str . basicItemDisplay) (inv ^? ix i)