From 95419098143a3dbd3a78b67ef5ca824a5c3fdd0c Mon Sep 17 00:00:00 2001
From: Jaro <jaro@argonaut-constellation.org>
Date: Thu, 6 Apr 2023 17:19:46 +0200
Subject: [PATCH] Fix style: remove duplicate spaces.

---
 test/Data/Text/ParagraphLayoutSpec.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/test/Data/Text/ParagraphLayoutSpec.hs b/test/Data/Text/ParagraphLayoutSpec.hs
index bd374fa..8d79c99 100644
--- a/test/Data/Text/ParagraphLayoutSpec.hs
+++ b/test/Data/Text/ParagraphLayoutSpec.hs
@@ -55,7 +55,7 @@ newtype Pages = Pages { getPages :: [Page] }
 instance PrettyShow Pages where
     prettyShow (Pages ps) = concat
         [ "["
-        , concat $ indentedList indent0 $ map (prettyShow  . Page') ps
+        , concat $ indentedList indent0 $ map (prettyShow . Page') ps
         , "]"
         ]
 
-- 
2.30.2