From 128cf46089f5a2fa688097f596563ecefd9c466b Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Tue, 14 Dec 2010 18:22:20 -0800 Subject: Fixed regression in parsing _emph_ There was a bug in parsing '_emph_, ...': when followed by a comma, underscore emphasis did not register. (Thanks to gwern for pointing this out.) This bug was introduced by the change in c66921f2acea456af527b93e2daa1d8594798642 --- src/Text/Pandoc/Readers/Markdown.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text/Pandoc') diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 51c61103b..be1fdc5d0 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -1059,7 +1059,7 @@ strChar = noneOf (specialChars ++ " \t\n") str :: GenParser Char ParserState Inline str = do a <- strChar - as <- many (strChar <|> (try $ char '_' >>~ lookAhead strChar)) + as <- many (strChar <|> (try $ char '_' >>~ lookAhead alphaNum)) let result = a:as state <- getState let spacesToNbr = map (\c -> if c == ' ' then '\160' else c) -- cgit v1.2.3