Markdown reader: Be less restrictive about class attributes.

This allows attributes like `C++`.  Any nonspace and non-}.
This commit is contained in:
John MacFarlane 2013-01-16 15:35:51 -08:00
parent 31fa80fdcb
commit b158b3fb21

View file

@ -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)])