diff options
Diffstat (limited to 'Text')
| -rw-r--r-- | Text/Pandoc/Readers/Markdown.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Text/Pandoc/Readers/Markdown.hs b/Text/Pandoc/Readers/Markdown.hs index eee22859f..73b7e688a 100644 --- a/Text/Pandoc/Readers/Markdown.hs +++ b/Text/Pandoc/Readers/Markdown.hs @@ -310,10 +310,10 @@ codeBlockDelimiter len = try $ do classAttributes = try $ do char '{' many spaceChar - attrs <- many $ do char '.' - attr <- many1 alphaNum - many spaceChar - return attr + attrs <- many $ try $ do char '.' + attr <- many1 alphaNum + many spaceChar + return attr char '}' return $ unwords attrs |