@@ -228,15 +228,9 @@ Pandoc (Meta {unMeta = fromList [("author",MetaList [MetaInlines [Str "John",Spa
228228 ,[Plain [Str "sublist"]]]]])]
229229,Header 1 ("html-blocks",[],[]) [Str "HTML",Space,Str "Blocks"]
230230,Para [Str "Simple",Space,Str "block",Space,Str "on",Space,Str "one",Space,Str "line:"]
231−,RawBlock (Format "html") "<div>"
232−,Plain [Str "foo"]
233−,RawBlock (Format "html") "</div>\n"
231+,Div ("",[],[]) [Plain [Str "foo"]]
234232,Para [Str "And",Space,Str "nested",Space,Str "without",Space,Str "indentation:"]
235−,RawBlock (Format "html") "<div>\n<div>\n<div>"
236−,Plain [Str "foo"]
237−,RawBlock (Format "html") "</div>\n</div>\n<div>"
238−,Plain [Str "bar"]
239−,RawBlock (Format "html") "</div>\n</div>\n"
233+,Div ("",[],[]) [Div ("",[],[]) [Div ("",[],[]) [Plain [Str "foo"]]],Div ("",[],[]) [Plain [Str "bar"]]]
240234,Para [Str "Interpreted",Space,Str "markdown",Space,Str "in",Space,Str "a",Space,Str "table:"]
241235,RawBlock (Format "html") "<table>\n<tr>\n<td>"
242236,Plain [Str "This",Space,Str "is",Space,Emph [Str "emphasized"]]
@@ -244,17 +238,13 @@ Pandoc (Meta {unMeta = fromList [("author",MetaList [MetaInlines [Str "John",Spa
244238,Plain [Str "And",Space,Str "this",Space,Str "is",Space,Strong [Str "strong"]]
245239,RawBlock (Format "html") "</td>\n</tr>\n</table>\n\n<script type=\"text/javascript\">document.write('This *should not* be interpreted as markdown');</script>\n"
246240,Para [Str "Here\8217s",Space,Str "a",Space,Str "simple",Space,Str "block:"]
247−,RawBlock (Format "html") "<div>\n "
248−,Plain [Str "foo"]
249−,RawBlock (Format "html") "</div>\n"
241+,Div ("",[],[]) [Plain [Str "foo"]]
250242,Para [Str "This",Space,Str "should",Space,Str "be",Space,Str "a",Space,Str "code",Space,Str "block,",Space,Str "though:"]
251243,CodeBlock ("",[],[]) "<div>\n foo\n</div>"
252244,Para [Str "As",Space,Str "should",Space,Str "this:"]
253245,CodeBlock ("",[],[]) "<div>foo</div>"
254246,Para [Str "Now,",Space,Str "nested:"]
255−,RawBlock (Format "html") "<div>\n <div>\n <div>\n "
256−,Plain [Str "foo"]
257−,RawBlock (Format "html") "</div>\n </div>\n</div>\n"
247+,Div ("",[],[]) [Div ("",[],[]) [Div ("",[],[]) [Plain [Str "foo"]]]]
258248,Para [Str "This",Space,Str "should",Space,Str "just",Space,Str "be",Space,Str "an",Space,Str "HTML",Space,Str "comment:"]
259249,RawBlock (Format "html") "<!-- Comment -->\n"
260250,Para [Str "Multiline:"]