summaryrefslogtreecommitdiff
path: root/src/Test.hs
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2023-02-02 22:06:06 +0100
committerRoman Smrž <roman.smrz@seznam.cz>2023-02-02 22:06:06 +0100
commit5295d3255e9d2db1d9eaaefc40666989df71b649 (patch)
tree97d5222b8d6ef7eae9062fe909265785ab9e7044 /src/Test.hs
parentaa440ae072ca3dffab6fc2efb96b141de9d944dd (diff)
Enable OverloadedStrings as default extension
Diffstat (limited to 'src/Test.hs')
-rw-r--r--src/Test.hs2
1 files changed, 1 insertions, 1 deletions
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]