1 files changed, 1 insertions(+), 1 deletions(-)

M 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
         , "]"
         ]