summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2013-01-16 15:35:51 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2013-01-16 15:35:51 -0800
commitb158b3fb2182b5c8a6f03759277f4f73cdc24797 (patch)
tree659000fa708e839d0e6c611d2c1314f0d6238dde
parent31fa80fdcb8b88e76d0384bcc0eec3d11ea0d55b (diff)
Markdown reader: Be less restrictive about class attributes.
This allows attributes like `C++`. Any nonspace and non-}.
-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)])