diff --git a/src/Mtlstats/Menu.hs b/src/Mtlstats/Menu.hs
index 51c5029..cfad6b8 100644
--- a/src/Mtlstats/Menu.hs
+++ b/src/Mtlstats/Menu.hs
@@ -119,11 +119,11 @@ mainMenu = Menu "*** MAIN MENU ***" True
 -- | The new season menu
 newSeasonMenu :: Menu ()
 newSeasonMenu = Menu "*** SEASON TYPE ***" ()
-  [ MenuItem '1' "Regular Season" $ modify
+  [ MenuItem 'R' "Regular Season" $ modify
     $ resetYtd
     . resetStandings
     . startNewGame
-  , MenuItem '2' "Playoffs" $ modify
+  , MenuItem 'P' "Playoffs" $ modify
     $ resetStandings
     . startNewGame
   ]