added edit menu to main menu

2019-12-17 12:04:11 -05:00
parent 1d6a4aa7f3
commit 9980a095ed
2 changed files with 7 additions and 4 deletions
--- a/src/Mtlstats/Menu.hs
+++ b/src/Mtlstats/Menu.hs
@@ -118,10 +118,8 @@ mainMenu = Menu "*** MAIN MENU ***" True
    modify createPlayer >> return True
  , MenuItem '4' "Create Goalie" $
    modify createGoalie >> return True
-  , MenuItem '5' "Edit Player" $
-    modify editPlayer >> return True
-  , MenuItem '6' "Edit Goalie" $
-    modify editGoalie >> return True
+  , MenuItem '5' "Edit" $
+    modify edit >> return True
  , MenuItem 'X' "Exit" $ do
    db <- gets $ view database
    liftIO $ do