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 /src/Text/Pandoc | |
| parent | b14b2d6a85267cee3649048bb761a48cc0ab30be (diff) | |
| download | pandoc-e5004bcff040a2bc85d7ed6acb42425d265f1bd2.tar.gz | |
Implement strikeout in dokuwiki writer (#386)
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/DokuWiki.hs | 2 |
1 files changed, 1 insertions, 1 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 |