aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Text/Pandoc/Writers/ICML.hs7
1 files changed, 4 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Writers/ICML.hs b/src/Text/Pandoc/Writers/ICML.hs
index 1a7759740..f463c75c5 100644
--- a/src/Text/Pandoc/Writers/ICML.hs
+++ b/src/Text/Pandoc/Writers/ICML.hs
@@ -483,9 +483,10 @@ mergeStrings opts = mergeStrings' . map spaceToStr
WrapPreserve -> Str "\n"
_ -> Str " "
spaceToStr x = x
-mergeStrings' (Str x : Str y : zs) = mergeStrings' (Str (x ++ y) : zs)
-mergeStrings' (x : xs) = x : mergeStrings' xs
-mergeStrings' [] = []
+
+ mergeStrings' (Str x : Str y : zs) = mergeStrings' (Str (x ++ y) : zs)
+ mergeStrings' (x : xs) = x : mergeStrings' xs
+ mergeStrings' [] = []
-- | Intersperse line breaks
intersperseBrs :: [Doc] -> Doc