display lifetime stats in report

2019-12-13 11:43:22 -05:00
parent 1ec9e93f16
commit 3738088dde
2 changed files with 5 additions and 2 deletions
@@ -151,10 +151,10 @@ lifetimeStatsReport :: Int -> ProgState -> [String]
 lifetimeStatsReport width s = let
  db = s^.database

-  playerStats = map (\p -> (p, p^.pYtd))
+  playerStats = map (\p -> (p, p^.pLifetime))
    $ db^.dbPlayers

-  goalieStats = map (\g -> (g, g^.gYtd))
+  goalieStats = map (\g -> (g, g^.gLifetime))
    $ db^.dbGoalies

  in playerReport width "LIFETIME" playerStats