aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMauro Bieg <mb21@users.noreply.github.com>2018-03-12 02:20:36 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2018-03-11 18:20:36 -0700
commita0da1e2723a08b4afc12a6e358d3abfdffeb6944 (patch)
treea559135478976d404047314f6a53633927ef8b5e /src
parent2f979e068497f28c4e8ff29549df0de6fc265420 (diff)
downloadpandoc-a0da1e2723a08b4afc12a6e358d3abfdffeb6944.tar.gz
Dokuwiki writer: fix LineBreaks in Tables (#4444)
fixes #4313
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Writers/DokuWiki.hs6
1 files changed, 5 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/DokuWiki.hs b/src/Text/Pandoc/Writers/DokuWiki.hs
index dda21d23d..3fd297c00 100644
--- a/src/Text/Pandoc/Writers/DokuWiki.hs
+++ b/src/Text/Pandoc/Writers/DokuWiki.hs
@@ -479,7 +479,11 @@ inlineToDokuWiki _ il@(RawInline f str)
| f == Format "html" = return $ "<html>" ++ str ++ "</html>"
| otherwise = "" <$ report (InlineNotRendered il)
-inlineToDokuWiki _ LineBreak = return "\\\\\n"
+inlineToDokuWiki _ LineBreak = do
+ backSlash <- stBackSlashLB <$> ask
+ return $ if backSlash
+ then "\n"
+ else "\\\\\n"
inlineToDokuWiki opts SoftBreak =
case writerWrapText opts of