aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers
diff options
context:
space:
mode:
authorClare Macrae <github@cfmacrae.fastmail.co.uk>2014-07-02 21:40:12 +0100
committerClare Macrae <github@cfmacrae.fastmail.co.uk>2014-07-02 21:40:12 +0100
commit61cc983bea706eb4ce7cedcc61824f8dc39c226f (patch)
treeee6a729146c62fb2028c36ac7e4fa70f5af1babc /src/Text/Pandoc/Writers
parentd234157d25e13cdb84e96404dfae610c1ad4b4d6 (diff)
downloadpandoc-61cc983bea706eb4ce7cedcc61824f8dc39c226f.tar.gz
DokuWiki writer: Retain unknown RawBlock and RawInline text
This added \cite and \begin latex to the testuite output.
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r--src/Text/Pandoc/Writers/DokuWiki.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/DokuWiki.hs b/src/Text/Pandoc/Writers/DokuWiki.hs
index 8ea1841eb..621cc77dd 100644
--- a/src/Text/Pandoc/Writers/DokuWiki.hs
+++ b/src/Text/Pandoc/Writers/DokuWiki.hs
@@ -124,7 +124,7 @@ blockToDokuWiki opts (Para inlines) = do
blockToDokuWiki _ (RawBlock f str)
| f == Format "mediawiki" = return str
| f == Format "html" = return $ "<html>\n" ++ str ++ "</html>"
- | otherwise = return ""
+ | otherwise = return str
blockToDokuWiki _ HorizontalRule = return "\n----\n"
@@ -409,7 +409,7 @@ inlineToDokuWiki _ (Math _ str) = return $ "<math>" ++ str ++ "</math>"
inlineToDokuWiki _ (RawInline f str)
| f == Format "mediawiki" = return str
| f == Format "html" = return str
- | otherwise = return ""
+ | otherwise = return str
inlineToDokuWiki _ (LineBreak) = return "\\\\ "