Implement strikeout in dokuwiki writer (#386)

This commit is contained in:
claremacrae 2013-08-06 07:43:32 +01:00
parent b14b2d6a85
commit e5004bcff0
2 changed files with 2 additions and 2 deletions

View file

@ -378,7 +378,7 @@ inlineToDokuWiki opts (Strong lst) = do
inlineToDokuWiki opts (Strikeout lst) = do
contents <- inlineListToDokuWiki opts lst
return $ "<s>" ++ contents ++ "</s>"
return $ "<del>" ++ contents ++ "</del>"
inlineToDokuWiki opts (Superscript lst) = do
contents <- inlineListToDokuWiki opts lst

View file

@ -435,7 +435,7 @@ So is **//this//** word.
This is code: <code>&gt;</code>, <code>$</code>, <code>\</code>, <code>\$</code>, <code>&lt;html&gt;</code>.
<s>This is //strikeout//.</s>
<del>This is //strikeout//.</del>
Superscripts: a<sup>bc</sup>d a<sup>//hello//</sup> a<sup>hello there</sup>.