git.iko.soy/typeable/pandoc
on master help sign in
HTML writer: Use `<del>` for strikeout.
commitbfa5ca01bc2ea97f041441ef7f4667decd76c5c8 authorJohn MacFarlane <fiddlosopher@gmail.com> dateSun 18 Dec 2011, 11:08 (15 years ago) parent1c52151
2 files changed+2−2
src/Text/Pandoc/Writers/HTML.hs+1−1 tests/writer.html+1−1
src/Text/Pandoc/Writers/HTML.hs+1−1
@@ -546,7 +546,7 @@ inlineToHtml opts inline =
546546 $ strToHtml str
547547 Right h -> return h
548548 (Strikeout lst) -> inlineListToHtml opts lst >>=
549− return . (H.span ! A.style "text-decoration: line-through;")
549+ return . H.del
550550 (SmallCaps lst) -> inlineListToHtml opts lst >>=
551551 return . (H.span ! A.style "font-variant: small-caps;")
552552 (Superscript lst) -> inlineListToHtml opts lst >>= return . H.sup
tests/writer.html+1−1
@@ -424,7 +424,7 @@ Blah
424424<p><strong><em>This is strong and em.</em></strong></p>
425425<p>So is <strong><em>this</em></strong> word.</p>
426426<p>This is code: <code>&gt;</code>, <code>$</code>, <code>\</code>, <code>\$</code>, <code>&lt;html&gt;</code>.</p>
427−<p><span style="text-decoration: line-through;">This is <em>strikeout</em>.</span></p>
427+<p><del>This is <em>strikeout</em>.</del></p>
428428<p>Superscripts: a<sup>bc</sup>d a<sup><em>hello</em></sup> a<sup>hello there</sup>.</p>
429429<p>Subscripts: H<sub>2</sub>O, H<sub>23</sub>O, H<sub>many of them</sub>O.</p>
430430<p>These should not be superscripts or subscripts, because of the unescaped spaces: a^b c^d, a~b c~d.</p>