Fix warning.

jgm · Dec 3, 2023 · 75ba152 · 75ba152
1 parent e9aef42
commit 75ba152
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/skylighting-core/src/Regex/KDE/Compile.hs b/skylighting-core/src/Regex/KDE/Compile.hs
@@ -274,7 +274,7 @@ pRegexCharClass = do
         (\d x -> x >= c && x <= d) <$> (char '-' *> getC) <|>
           return (== c)
   let getQELiteral = do
-        A.string "\\Q"
+        void $ A.string "\\Q"
         cs <- manyTill anyChar (A.string "\\E")
         return $! \c -> any (== c) cs
   brack <- option [] $ [(==']')] <$ char ']'