implemented Mtlstats.Control.EditGoalie.ytdGamesC

This commit is contained in:
Jonathan Lamothe 2019-11-14 00:44:38 -05:00
parent 3839d6dd32
commit 06348fe928
2 changed files with 6 additions and 1 deletions

View File

@ -79,7 +79,7 @@ lifetimeMenuC :: Controller
lifetimeMenuC = menuControllerWith header editGoalieLtMenu lifetimeMenuC = menuControllerWith header editGoalieLtMenu
ytdGamesC :: Controller ytdGamesC :: Controller
ytdGamesC = undefined ytdGamesC = promptController editGoalieYtdGamesPrompt
ytdMinsC :: Controller ytdMinsC :: Controller
ytdMinsC = undefined ytdMinsC = undefined

View File

@ -23,6 +23,7 @@ module Mtlstats.Prompt.EditGoalie
( goalieToEditPrompt ( goalieToEditPrompt
, editGoalieNumberPrompt , editGoalieNumberPrompt
, editGoalieNamePrompt , editGoalieNamePrompt
, editGoalieYtdGamesPrompt
) where ) where
import Control.Monad.Trans.State (modify) import Control.Monad.Trans.State (modify)
@ -46,3 +47,7 @@ editGoalieNumberPrompt = numPrompt "Goalie number: " $
editGoalieNamePrompt :: Prompt editGoalieNamePrompt :: Prompt
editGoalieNamePrompt = strPrompt "Goalie name: " $ editGoalieNamePrompt = strPrompt "Goalie name: " $
modify . editGoalieName modify . editGoalieName
-- | Prompt to edit a goalie's YTD games played
editGoalieYtdGamesPrompt :: Prompt
editGoalieYtdGamesPrompt = undefined