diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2015-10-22 21:18:06 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2015-10-22 21:18:06 -0700 |
| commit | a7150bb6b625dec9fd641dc770ab61a32e9d4e2c (patch) | |
| tree | 72232f129e607c5866e82fcbad0a3378b9728ce8 /src/Text/Pandoc/Readers | |
| parent | a21833b638c6c54925c89f91bfe09c056e5481a8 (diff) | |
| download | pandoc-a7150bb6b625dec9fd641dc770ab61a32e9d4e2c.tar.gz | |
Fixed over-eager raw HTML inline parsing.
Tightened up the inline HTML parser so it disallows
TagWarnings.
This only affects the markdown reader when the `markdown_in_html_blocks`
option is disabled.
Closes #2469.
Diffstat (limited to 'src/Text/Pandoc/Readers')
| -rw-r--r-- | src/Text/Pandoc/Readers/HTML.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/HTML.hs b/src/Text/Pandoc/Readers/HTML.hs index 8b66d2d3d..a97285ae2 100644 --- a/src/Text/Pandoc/Readers/HTML.hs +++ b/src/Text/Pandoc/Readers/HTML.hs @@ -948,6 +948,7 @@ htmlTag f = try $ do parseOptions{ optTagWarning = True } inp guard $ f next case next of + TagWarning _ -> fail "encountered TagWarning" TagComment s | "<!--" `isPrefixOf` inp -> do count (length s + 4) anyChar |