fixed new season menu
- use 'R' and 'P' instead of '1' and '2'
This commit is contained in:
parent
4d6c3faf5e
commit
01a4141ff4
|
@ -119,11 +119,11 @@ mainMenu = Menu "*** MAIN MENU ***" True
|
||||||
-- | The new season menu
|
-- | The new season menu
|
||||||
newSeasonMenu :: Menu ()
|
newSeasonMenu :: Menu ()
|
||||||
newSeasonMenu = Menu "*** SEASON TYPE ***" ()
|
newSeasonMenu = Menu "*** SEASON TYPE ***" ()
|
||||||
[ MenuItem '1' "Regular Season" $ modify
|
[ MenuItem 'R' "Regular Season" $ modify
|
||||||
$ resetYtd
|
$ resetYtd
|
||||||
. resetStandings
|
. resetStandings
|
||||||
. startNewGame
|
. startNewGame
|
||||||
, MenuItem '2' "Playoffs" $ modify
|
, MenuItem 'P' "Playoffs" $ modify
|
||||||
$ resetStandings
|
$ resetStandings
|
||||||
. startNewGame
|
. startNewGame
|
||||||
]
|
]
|
||||||
|
|
Loading…
Reference in New Issue
Block a user