diff options
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index d470220c6..1f57d1918 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -506,7 +506,7 @@ identifierAttr = try $ do classAttr :: Parser [Char] st (String, [String], [a]) classAttr = try $ do char '.' - result <- many1 $ noneOf " \t\n\r}" + result <- identifier return ("",[result],[]) keyValAttr :: Parser [Char] st (String, [a], [(String, String)]) |