From cfe2969106aa844c1abf263aae5c05e4a288896d Mon Sep 17 00:00:00 2001
From: Jonathan Lamothe <jlamothe1980@gmail.com>
Date: Wed, 16 Oct 2019 02:32:57 -0400
Subject: [PATCH] generate empty game stats report on failure

---
 src/Mtlstats/Report.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Mtlstats/Report.hs b/src/Mtlstats/Report.hs
index aec4cb9..00976c2 100644
--- a/src/Mtlstats/Report.hs
+++ b/src/Mtlstats/Report.hs
@@ -91,8 +91,8 @@ standingsReport width s = fromMaybe [] $ do
     ]
 
 gameStatsReport :: Int -> ProgState -> [String]
-gameStatsReport width s = maybe [] (playerReport width "GAME") $
-  mapM
+gameStatsReport width s = playerReport width "GAME" $
+  fromMaybe [] $ mapM
     (\(pid, stats) -> do
       p <- nth pid $ s^.database.dbPlayers
       Just (p, stats))