whitespace fix

This commit is contained in:
Jonathan Lamothe
2019-08-31 11:27:02 -04:00
parent 9f076db27b
commit f718757bea
3 changed files with 11 additions and 11 deletions

View File

@@ -75,7 +75,7 @@ newSeasonMenu = Menu "*** SEASON TYPE ***" ()
gameTypeMenu :: Menu ()
gameTypeMenu = Menu "*** GAME TYPE ***" ()
[ MenuItem '1' "Home Game" $
modify $ progMode . gameStateL . gameType ?~ HomeGame
modify $ progMode.gameStateL.gameType ?~ HomeGame
, MenuItem '2' "Away Game" $
modify $ progMode . gameStateL . gameType ?~ AwayGame
modify $ progMode.gameStateL.gameType ?~ AwayGame
]