diff options
| author | claremacrae <github@cfmacrae.fastmail.co.uk> | 2013-08-06 07:43:32 +0100 |
|---|---|---|
| committer | claremacrae <github@cfmacrae.fastmail.co.uk> | 2013-08-06 07:43:32 +0100 |
| commit | e5004bcff040a2bc85d7ed6acb42425d265f1bd2 (patch) | |
| tree | 414c3912158e0958e0755fb863f70643b62f7bd4 | |
| parent | b14b2d6a85267cee3649048bb761a48cc0ab30be (diff) | |
Implement strikeout in dokuwiki writer (#386)
| -rw-r--r-- | src/Text/Pandoc/Writers/DokuWiki.hs | 2 | ||||
| -rw-r--r-- | tests/writer.dokuwiki | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/DokuWiki.hs b/src/Text/Pandoc/Writers/DokuWiki.hs index b172741de..db02bde89 100644 --- a/src/Text/Pandoc/Writers/DokuWiki.hs +++ b/src/Text/Pandoc/Writers/DokuWiki.hs @@ -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 diff --git a/tests/writer.dokuwiki b/tests/writer.dokuwiki index 27fb29007..9063ab917 100644 --- a/tests/writer.dokuwiki +++ b/tests/writer.dokuwiki @@ -435,7 +435,7 @@ So is **//this//** word. This is code: <code>></code>, <code>$</code>, <code>\</code>, <code>\$</code>, <code><html></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>. |