Insert CDATA around inline js/css in HTML, slidy.
commitc872d9f7ef97a77adf0778047d9a30fb15815346
authorJohn MacFarlane <jgm@berkeley.edu>
dateSun 24 Jul 2011, 08:23 (15 years ago)
parent835dc41
src/Text/Pandoc/Writers/HTML.hs+2−1
@@ -142,7 +142,8 @@ pandocToHtml opts (Pandoc (Meta title' authors' date') blocks) = do
142142 _ -> case lookup "mathml-script" (writerVariables opts) of
143143 Just s ->
144144 script ! [thetype "text/javascript"] <<
145− primHtml s
145+ primHtml ("/*<![CDATA[*/\n" ++ s ++
146+ "/*]]>*/\n")
146147 Nothing -> noHtml
147148 else noHtml
148149 let newvars = [("highlighting-css", defaultHighlightingCss) |
templates+1−1
Submodule changed.