Markdown reader: allow empty attributes.

See #2944.
2018-04-19 23:01:52 -07:00 · 2018-04-19 23:01:52 -07:00 · f508c833f1
commit f508c833f1
parent 276894a2f2
1 changed files with 2 additions and 0 deletions
--- a/src/Text/Pandoc/Readers/Markdown.hs
+++ b/src/Text/Pandoc/Readers/Markdown.hs
@ -674,6 +674,8 @@ keyValAttr = try $ do
  char '='
  val <- enclosed (char '"') (char '"') litChar
     <|> enclosed (char '\'') (char '\'') litChar
+     <|> ("" <$ try (string "\"\""))
+     <|> ("" <$ try (string "''"))
     <|> many (escapedChar' <|> noneOf " \t\n\r}")
  return $ \(id',cs,kvs) ->
    case key of