paul/utoy
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add newline after text table

Browse Source
This commit is contained in:
Paul Brinkmeier 2023-03-24 12:54:55 +01:00
parent ab667742da
commit 0d59ded2ec
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/UToy/Table.hs
View File

@ -17,7 +17,7 @@ cr :: Text -> Cell
cr = C AlignRight cr = C AlignRight
render :: Text -> [[Cell]] -> Text render :: Text -> [[Cell]] -> Text
render delim cells = Text.intercalate "\n" $ map showRow cells render delim cells = Text.unlines $ map showRow cells
where where
showRow = Text.intercalate delim . map showCell . zipLongest columnWidths showRow = Text.intercalate delim . map showCell . zipLongest columnWidths