diff options
| -rw-r--r-- | src/Text/Pandoc/Writers/Ms.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/Ms.hs b/src/Text/Pandoc/Writers/Ms.hs index 80b56193c..ce3907bbe 100644 --- a/src/Text/Pandoc/Writers/Ms.hs +++ b/src/Text/Pandoc/Writers/Ms.hs @@ -118,12 +118,14 @@ msEscapes :: Map.Map Char String msEscapes = Map.fromList $ [ ('\160', "\\ ") , ('\'', "\\[aq]") - , ('’', "'") + , ('`', "\\`") + , ('\8217', "'") , ('"', "\\\"") , ('\x2014', "\\[em]") , ('\x2013', "\\[en]") , ('\x2026', "\\&...") - , ('|', "\\[u007C]") -- because we use | for inline math + , ('~', "\\[ti]") + , ('^', "\\[ha]") , ('-', "\\-") , ('@', "\\@") , ('\\', "\\\\") |