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