implemented editMenu
This commit is contained in:
parent
8988ad9146
commit
1d6a4aa7f3
|
@ -190,4 +190,11 @@ gameGoalieMenu s = let
|
|||
|
||||
-- | The edit menu
|
||||
editMenu :: Menu ()
|
||||
editMenu = undefined
|
||||
editMenu = Menu "*** EDIT ***" ()
|
||||
[ MenuItem '1' "Edit Player" $
|
||||
modify editPlayer
|
||||
, MenuItem '2' "Edit Goalie" $
|
||||
modify editGoalie
|
||||
, MenuItem 'R' "Return to Main Menu" $
|
||||
modify backHome
|
||||
]
|
||||
|
|
Loading…
Reference in New Issue
Block a user