fingerprint/mtlstats
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

made standings table prettier

Browse Source
This commit is contained in:
Jonathan Lamothe
2020-01-16 19:58:07 -05:00
parent d5de834510
commit 717f2d5932
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Mtlstats/Control/EditStandings.hs
+3 -3
View File
@@ -54,9 +54,9 @@ header = do
let let
home = db^.dbHomeGameStats home = db^.dbHomeGameStats
away = db^.dbAwayGameStats away = db^.dbAwayGameStats
table = numTable ["Wins", "Losses", "Overtime", "Goals for", "Goals against"] table = numTable [" W", " L", " OT", " GF", " GA"]
[ ( "Home", valsFor home ) [ ( "HOME", valsFor home )
, ( "Road", valsFor away ) , ( "ROAD", valsFor away )
] ]
return $ C.drawString $ unlines $ table ++ [""] return $ C.drawString $ unlines $ table ++ [""]