diff --git a/src/Mtlstats/UI.hs b/src/Mtlstats/UI.hs index 7ec5be2..56cf86a 100644 --- a/src/Mtlstats/UI.hs +++ b/src/Mtlstats/UI.hs @@ -36,5 +36,7 @@ draw s = do case s ^. progMode of MainMenu -> drawMenu mainMenu NewSeason -> drawMenu newSeasonMenu - NewGame _ -> return () + NewGame gs -> if null $ gs ^. gameType + then drawMenu gameTypeMenu + else undefined C.render