git.iko.soy/typeable/pandoc
on master help sign in
Implement strikeout in dokuwiki writer (#386)
e5004bcclaremacrae
src/Text/Pandoc/Writers/DokuWiki.hs+1−1
@@ -378,7 +378,7 @@ inlineToDokuWiki opts (Strong lst) = do
378
378
379inlineToDokuWiki opts (Strikeout lst) = do
379inlineToDokuWiki opts (Strikeout lst) = do
380 contents <- inlineListToDokuWiki opts lst
380 contents <- inlineListToDokuWiki opts lst
381− return $ "<s>" ++ contents ++ "</s>"
381+ return $ "<del>" ++ contents ++ "</del>"
382
382
383inlineToDokuWiki opts (Superscript lst) = do
383inlineToDokuWiki opts (Superscript lst) = do
384 contents <- inlineListToDokuWiki opts lst
384 contents <- inlineListToDokuWiki opts lst
tests/writer.dokuwiki+1−1
@@ -435,7 +435,7 @@ So is **//this//** word.
435
435
436This is code: <code>&gt;</code>, <code>$</code>, <code>\</code>, <code>\$</code>, <code>&lt;html&gt;</code>.
436This is code: <code>&gt;</code>, <code>$</code>, <code>\</code>, <code>\$</code>, <code>&lt;html&gt;</code>.
437
437
438−<s>This is //strikeout//.</s>
438+<del>This is //strikeout//.</del>
439
439
440Superscripts: a<sup>bc</sup>d a<sup>//hello//</sup> a<sup>hello there</sup>.
440Superscripts: a<sup>bc</sup>d a<sup>//hello//</sup> a<sup>hello there</sup>.
441
441