From 62a5f6fa85fcaa0067cf66a2c573e4fc678aab96 Mon Sep 17 00:00:00 2001 From: Albert Krewinkel Date: Wed, 7 Nov 2018 09:52:12 +0100 Subject: ICML writer: fix missing type signature warning --- src/Text/Pandoc/Writers/ICML.hs | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'src/Text') 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 -- cgit v1.2.3