From 0d59ded2ec1d11269d04dcc6b740898067402002 Mon Sep 17 00:00:00 2001 From: Paul Brinkmeier Date: Fri, 24 Mar 2023 12:54:55 +0100 Subject: [PATCH] Add newline after text table --- src/UToy/Table.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/UToy/Table.hs b/src/UToy/Table.hs index 2527432..ace3012 100644 --- a/src/UToy/Table.hs +++ b/src/UToy/Table.hs @@ -17,7 +17,7 @@ cr :: Text -> Cell cr = C AlignRight render :: Text -> [[Cell]] -> Text -render delim cells = Text.intercalate "\n" $ map showRow cells +render delim cells = Text.unlines $ map showRow cells where showRow = Text.intercalate delim . map showCell . zipLongest columnWidths