aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Roff.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2020-03-05 19:29:14 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2020-03-05 19:29:14 -0800
commit4faac2bf9b796cc3e04d0fcbfee6a5d2b0f0fe6d (patch)
treeffd59f6f9b17b976ad6bb8cf4bf5eac551946536 /src/Text/Pandoc/Readers/Roff.hs
parent4eb0c1eec1704cc85128d7da62fb9c9d113c41b5 (diff)
downloadpandoc-4faac2bf9b796cc3e04d0fcbfee6a5d2b0f0fe6d.tar.gz
Fix parsing of `\'` in man/ms readers.
It was being parsed as a backtick. Closes #6175.
Diffstat (limited to 'src/Text/Pandoc/Readers/Roff.hs')
-rw-r--r--src/Text/Pandoc/Readers/Roff.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Roff.hs b/src/Text/Pandoc/Readers/Roff.hs
index d1700703c..e50a98b06 100644
--- a/src/Text/Pandoc/Readers/Roff.hs
+++ b/src/Text/Pandoc/Readers/Roff.hs
@@ -226,7 +226,7 @@ escapeNormal = do
'X' -> escIgnore 'X' [quoteArg]
'Y' -> escIgnore 'Y' [escapeArg, countChar 1 (satisfy (/='\n'))]
'Z' -> escIgnore 'Z' [quoteArg]
- '\'' -> return [RoffStr "`"]
+ '\'' -> return [RoffStr "'"]
'\n' -> return mempty -- line continuation
'^' -> return [RoffStr "\x200A"] -- 1/12 em space
'_' -> return [RoffStr "_"]