From 358dfba8f4eba45fdfdfad2c117de99df8b45bc4 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Sun, 26 Mar 2017 20:41:09 +0200 Subject: MediaWiki writer: don't softbreak lines inside list items. Closes #3531. --- src/Text/Pandoc/Writers/MediaWiki.hs | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'src/Text/Pandoc/Writers') diff --git a/src/Text/Pandoc/Writers/MediaWiki.hs b/src/Text/Pandoc/Writers/MediaWiki.hs index 594e31e95..def245e38 100644 --- a/src/Text/Pandoc/Writers/MediaWiki.hs +++ b/src/Text/Pandoc/Writers/MediaWiki.hs @@ -409,10 +409,13 @@ inlineToMediaWiki LineBreak = return "
\n" inlineToMediaWiki SoftBreak = do wrapText <- gets (writerWrapText . stOptions) + listlevel <- asks listLevel case wrapText of WrapAuto -> return " " WrapNone -> return " " - WrapPreserve -> return "\n" + WrapPreserve -> if null listlevel + then return "\n" + else return " " inlineToMediaWiki Space = return " " -- cgit v1.2.3