aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-12-31 00:45:54 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-12-31 00:45:54 +0000
commitad5cbb78d0256a9394d73aa594a838278b7a8c81 (patch)
tree56740fd7082bb3265612f8af9ec1796ba12887a3
parentd989a78b3bc701beb7dbe186297d2f3fc8cd6721 (diff)
downloadpandoc-ad5cbb78d0256a9394d73aa594a838278b7a8c81.tar.gz
HTML reader: Finished fixing Issue #40.
Contents of script tags were still being treated as markdown when the script tags were parsed as inline. Fixed by moving "script" from the list of tags that can be either block or inline to the list of block tags. git-svn-id: https://pandoc.googlecode.com/svn/trunk@1163 788f1e2b-df1e-0410-8736-df70ead52e1b
-rw-r--r--Text/Pandoc/Readers/HTML.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Text/Pandoc/Readers/HTML.hs b/Text/Pandoc/Readers/HTML.hs
index 9e5a0763a..1d04c74e0 100644
--- a/Text/Pandoc/Readers/HTML.hs
+++ b/Text/Pandoc/Readers/HTML.hs
@@ -60,7 +60,7 @@ readHtml = readWith parseHtml
--
eitherBlockOrInline = ["applet", "button", "del", "iframe", "ins",
- "map", "area", "object", "script"]
+ "map", "area", "object"]
inlineHtmlTags = ["a", "abbr", "acronym", "b", "basefont", "bdo", "big",
"br", "cite", "code", "dfn", "em", "font", "i", "img",
@@ -73,7 +73,7 @@ blockHtmlTags = ["address", "blockquote", "center", "dir", "div",
"h5", "h6", "hr", "isindex", "menu", "noframes",
"noscript", "ol", "p", "pre", "table", "ul", "dd",
"dt", "frameset", "li", "tbody", "td", "tfoot",
- "th", "thead", "tr"] ++ eitherBlockOrInline
+ "th", "thead", "tr", "script"] ++ eitherBlockOrInline
--
-- HTML utility functions