git.iko.soy/typeable/pandoc
on master help sign in
Added HTML reader tests for empty strong, emph.
976f4f2John MacFarlane
tests/html-reader.html+1
compare with master
unifiedsplit
@@ -302,6 +302,7 @@ These should not be escaped: \$ \\ \> \[ \{
302<h1>Inline Markup</h1>
302<h1>Inline Markup</h1>
303<p>This is <em>emphasized</em>, and so <em>is this</em>.</p>
303<p>This is <em>emphasized</em>, and so <em>is this</em>.</p>
304<p>This is <strong>strong</strong>, and so <strong>is this</strong>.</p>
304<p>This is <strong>strong</strong>, and so <strong>is this</strong>.</p>
305+<p>Empty <strong></strong> and <em></em>.
305<p>An <em><a href="/url">emphasized link</a></em>.</p>
306<p>An <em><a href="/url">emphasized link</a></em>.</p>
306<p><strong><em>This is strong and em.</em></strong></p>
307<p><strong><em>This is strong and em.</em></strong></p>
307<p>So is <strong><em>this</em></strong> word.</p>
308<p>So is <strong><em>this</em></strong> word.</p>
tests/html-reader.native+1
@@ -186,6 +186,7 @@ Pandoc (Meta {unMeta = fromList [("generator",MetaInlines [Str "pandoc"]),("titl
186,Header 1 ("",[],[]) [Str "Inline",Space,Str "Markup"]
186,Header 1 ("",[],[]) [Str "Inline",Space,Str "Markup"]
187,Para [Str "This",Space,Str "is",Space,Emph [Str "emphasized"],Str ",",Space,Str "and",Space,Str "so",Space,Emph [Str "is",Space,Str "this"],Str "."]
187,Para [Str "This",Space,Str "is",Space,Emph [Str "emphasized"],Str ",",Space,Str "and",Space,Str "so",Space,Emph [Str "is",Space,Str "this"],Str "."]
188,Para [Str "This",Space,Str "is",Space,Strong [Str "strong"],Str ",",Space,Str "and",Space,Str "so",Space,Strong [Str "is",Space,Str "this"],Str "."]
188,Para [Str "This",Space,Str "is",Space,Strong [Str "strong"],Str ",",Space,Str "and",Space,Str "so",Space,Strong [Str "is",Space,Str "this"],Str "."]
189+,Para [Str "Empty",Space,Strong [],Space,Str "and",Space,Emph [],Str "."]
189,Para [Str "An",Space,Emph [Link [Str "emphasized",Space,Str "link"] ("/url","")],Str "."]
190,Para [Str "An",Space,Emph [Link [Str "emphasized",Space,Str "link"] ("/url","")],Str "."]
190,Para [Strong [Emph [Str "This",Space,Str "is",Space,Str "strong",Space,Str "and",Space,Str "em."]]]
191,Para [Strong [Emph [Str "This",Space,Str "is",Space,Str "strong",Space,Str "and",Space,Str "em."]]]
191,Para [Str "So",Space,Str "is",Space,Strong [Emph [Str "this"]],Space,Str "word."]
192,Para [Str "So",Space,Str "is",Space,Strong [Emph [Str "this"]],Space,Str "word."]