diff options
Diffstat (limited to 'src/Test.hs')
| -rw-r--r-- | src/Test.hs | 2 |
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] |