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))