fixed name column spacing

This commit is contained in:
Jonathan Lamothe committed 2019-10-16 02:26:42 -04:00
1 parent 32f61ccc89
commit 19e0242135
2 files changed
+2 -2

No files matched your search

+1 -1
View File
@@ -150,7 +150,7 @@ playerReport width label ps = let
playerNameColWidth :: [Player] -> Int
playerNameColWidth = foldr
(\player current -> max current $ length $ player^.pName)
(\player current -> max current $ succ $ length $ player^.pName)
10
showStats :: GameStats -> String