diff --git a/src/Mtlstats/Control/EditGoalie.hs b/src/Mtlstats/Control/EditGoalie.hs index 686ad47..1e5f755 100644 --- a/src/Mtlstats/Control/EditGoalie.hs +++ b/src/Mtlstats/Control/EditGoalie.hs @@ -88,7 +88,7 @@ ytdGoalsC :: Controller ytdGoalsC = promptController editGoalieYtdGoalsPrompt ytdWinsC :: Controller -ytdWinsC = undefined +ytdWinsC = promptController editGoalieYtdWinsPrompt ytdLossesC :: Controller ytdLossesC = undefined diff --git a/src/Mtlstats/Prompt/EditGoalie.hs b/src/Mtlstats/Prompt/EditGoalie.hs index c31b0cd..f3b0aee 100644 --- a/src/Mtlstats/Prompt/EditGoalie.hs +++ b/src/Mtlstats/Prompt/EditGoalie.hs @@ -26,6 +26,7 @@ module Mtlstats.Prompt.EditGoalie , editGoalieYtdGamesPrompt , editGoalieYtdMinsPrompt , editGoalieYtdGoalsPrompt + , editGoalieYtdWinsPrompt ) where import Control.Monad.Trans.State (modify) @@ -64,3 +65,7 @@ editGoalieYtdMinsPrompt = numPrompt "Year-to-date minutes played: " $ editGoalieYtdGoalsPrompt :: Prompt editGoalieYtdGoalsPrompt = numPrompt "Year-to-date goals allowed: " $ modify . editGoalieYtdGoals + +-- | Prompt to edit a goalie's YTD wins +editGoalieYtdWinsPrompt :: Prompt +editGoalieYtdWinsPrompt = undefined