aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Text/Pandoc/Readers/HTML.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/HTML.hs b/src/Text/Pandoc/Readers/HTML.hs
index 66b55c448..8f8822d01 100644
--- a/src/Text/Pandoc/Readers/HTML.hs
+++ b/src/Text/Pandoc/Readers/HTML.hs
@@ -140,7 +140,7 @@ htmlAttribute = htmlRegularAttribute <|> htmlMinimizedAttribute
-- minimized boolean attribute (no = and value)
htmlMinimizedAttribute = try (do
- spaces
+ many1 space
name <- many1 (choice [letter, oneOf ".-_:"])
spaces
notFollowedBy (char '=')
@@ -148,7 +148,7 @@ htmlMinimizedAttribute = try (do
return (name, content, (" " ++ name)))
htmlRegularAttribute = try (do
- spaces
+ many1 space
name <- many1 (choice [letter, oneOf ".-_:"])
spaces
char '='