git.iko.soy/typeable/pandoc
on master help sign in
Pretty: return Str with unicode instead of Apostrophe.
8f1da35John MacFarlane
src/Text/Pandoc/Parsing.hs+1−1
@@ -704,7 +704,7 @@ smartPunctuation inlineParser = do
704 choice [ quoted inlineParser, apostrophe, dash, ellipses ]
704 choice [ quoted inlineParser, apostrophe, dash, ellipses ]
705
705
706apostrophe :: GenParser Char ParserState Inline
706apostrophe :: GenParser Char ParserState Inline
707−apostrophe = (char '\'' <|> char '\8217') >> return Apostrophe
707+apostrophe = (char '\'' <|> char '\8217') >> return (Str "\x2019")
708
708
709quoted :: GenParser Char ParserState Inline
709quoted :: GenParser Char ParserState Inline
710 -> GenParser Char ParserState Inline
710 -> GenParser Char ParserState Inline