aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Text/Pandoc/Readers/Markdown.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs
index 1f57d1918..d470220c6 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 <- identifier
+ result <- many1 $ noneOf " \t\n\r}"
return ("",[result],[])
keyValAttr :: Parser [Char] st (String, [a], [(String, String)])