aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers
diff options
context:
space:
mode:
authorclaremacrae <github@cfmacrae.fastmail.co.uk>2013-08-18 09:15:33 +0100
committerclaremacrae <github@cfmacrae.fastmail.co.uk>2013-08-18 09:15:33 +0100
commit288329044a63331658079aa9db57b46fe204b6b9 (patch)
treee1b15d02f16878ddef5a10be64430a95f44e09d9 /src/Text/Pandoc/Writers
parentb5b622f5b821ed5624b0ce2f29d1bddd0100bd04 (diff)
downloadpandoc-288329044a63331658079aa9db57b46fe204b6b9.tar.gz
Stop plain text ** and __ becoming formatting in dokuwiki writer (#386)
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r--src/Text/Pandoc/Writers/DokuWiki.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/DokuWiki.hs b/src/Text/Pandoc/Writers/DokuWiki.hs
index 4e7e79441..ec22a5a82 100644
--- a/src/Text/Pandoc/Writers/DokuWiki.hs
+++ b/src/Text/Pandoc/Writers/DokuWiki.hs
@@ -87,7 +87,7 @@ pandocToDokuWiki opts (Pandoc meta blocks) = do
-- | Escape special characters for MediaWiki.
escapeString :: String -> String
-escapeString str = substitute "//" "%%//%%" str
+escapeString str = substitute "__" "%%__%%" ( substitute "**" "%%**%%" ( substitute "//" "%%//%%" str ) )
-- | Convert Pandoc block element to DokuWiki.
blockToDokuWiki :: WriterOptions -- ^ Options