From 5295d3255e9d2db1d9eaaefc40666989df71b649 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Thu, 2 Feb 2023 22:06:06 +0100
Subject: Enable OverloadedStrings as default extension

---
 src/Test.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Test.hs')

diff --git a/src/Test.hs b/src/Test.hs
index 11cbca8..b2644b6 100644
--- a/src/Test.hs
+++ b/src/Test.hs
@@ -161,5 +161,5 @@ regexSource (RegexPart src) = src
 regexSource (RegexString str) = T.concatMap escapeChar str
   where
     escapeChar c | isAlphaNum c = T.singleton c
-                 | c `elem` "`'<>" = T.singleton c
+                 | c `elem` ['`', '\'', '<', '>'] = T.singleton c
                  | otherwise = T.pack ['\\', c]
-- 
cgit v1.2.3