implemented Mtlstats.Control.EditGoalie.ytdMenuC

This commit is contained in:
Jonathan Lamothe 2019-11-13 23:54:09 -05:00
parent 61ba781c5d
commit 35eda4a309
2 changed files with 9 additions and 2 deletions

View File

@ -73,7 +73,7 @@ nameC :: Controller
nameC = promptController editGoalieNamePrompt nameC = promptController editGoalieNamePrompt
ytdMenuC :: Controller ytdMenuC :: Controller
ytdMenuC = undefined ytdMenuC = menuControllerWith header editGoalieYtdMenu
lifetimeMenuC :: Controller lifetimeMenuC :: Controller
lifetimeMenuC = undefined lifetimeMenuC = undefined

View File

@ -19,7 +19,10 @@ along with this program. If not, see <https://www.gnu.org/licenses/>.
-} -}
module Mtlstats.Menu.EditGoalie (editGoalieMenu) where module Mtlstats.Menu.EditGoalie
( editGoalieMenu
, editGoalieYtdMenu
) where
import Control.Monad.Trans.State (modify) import Control.Monad.Trans.State (modify)
import Data.Maybe (maybe) import Data.Maybe (maybe)
@ -42,3 +45,7 @@ editGoalieMenu = Menu "*** EDIT GOALTENDER ***" () $ map
, ( '4', "Edit Lifetime stats", Just EGLifetime ) , ( '4', "Edit Lifetime stats", Just EGLifetime )
, ( 'R', "Return to Main Menu", Nothing ) , ( 'R', "Return to Main Menu", Nothing )
] ]
-- | The 'Goalie' YTD edit menu
editGoalieYtdMenu :: Menu ()
editGoalieYtdMenu = undefined