From 4bf9d362d22fcd7b51da7bd14a6a5b63533706c6 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Fri, 3 Dec 2010 22:52:46 -0800 Subject: Textile reader: Turn on smart punctuation by default. --- src/Text/Pandoc/Readers/Textile.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/Text/Pandoc/Readers') diff --git a/src/Text/Pandoc/Readers/Textile.hs b/src/Text/Pandoc/Readers/Textile.hs index 3465eebbe..f64c9e416 100644 --- a/src/Text/Pandoc/Readers/Textile.hs +++ b/src/Text/Pandoc/Readers/Textile.hs @@ -91,8 +91,8 @@ specialChars = "\\[]<>*#_@~-+^&,.;:!?|\"'%" -- | Generate a Pandoc ADT from a textile document parseTextile :: GenParser Char ParserState Pandoc parseTextile = do - -- textile allows raw HTML - updateState (\state -> state { stateParseRaw = True }) + -- textile allows raw HTML and does smart punctuation by default + updateState (\state -> state { stateParseRaw = True, stateSmart = True }) many blankline blocks <- parseBlocks return $ Pandoc (Meta [Str ""] [[Str ""]] [Str ""]) blocks -- FIXME -- cgit v1.2.3