diff options
author | Mauro Bieg <mb21@users.noreply.github.com> | 2018-03-12 02:20:36 +0100 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2018-03-11 18:20:36 -0700 |
commit | a0da1e2723a08b4afc12a6e358d3abfdffeb6944 (patch) | |
tree | a559135478976d404047314f6a53633927ef8b5e /src | |
parent | 2f979e068497f28c4e8ff29549df0de6fc265420 (diff) | |
download | pandoc-a0da1e2723a08b4afc12a6e358d3abfdffeb6944.tar.gz |
Dokuwiki writer: fix LineBreaks in Tables (#4444)
fixes #4313
Diffstat (limited to 'src')
-rw-r--r-- | src/Text/Pandoc/Writers/DokuWiki.hs | 6 |
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 |