implemented Mtlstats.Control.EditGoalie.ytdWinsC

This commit is contained in:
Jonathan Lamothe 2019-11-14 01:37:58 -05:00
parent cb5aa63469
commit 4f5b4ff5f9
2 changed files with 6 additions and 1 deletions

View File

@ -88,7 +88,7 @@ ytdGoalsC :: Controller
ytdGoalsC = promptController editGoalieYtdGoalsPrompt ytdGoalsC = promptController editGoalieYtdGoalsPrompt
ytdWinsC :: Controller ytdWinsC :: Controller
ytdWinsC = undefined ytdWinsC = promptController editGoalieYtdWinsPrompt
ytdLossesC :: Controller ytdLossesC :: Controller
ytdLossesC = undefined ytdLossesC = undefined

View File

@ -26,6 +26,7 @@ module Mtlstats.Prompt.EditGoalie
, editGoalieYtdGamesPrompt , editGoalieYtdGamesPrompt
, editGoalieYtdMinsPrompt , editGoalieYtdMinsPrompt
, editGoalieYtdGoalsPrompt , editGoalieYtdGoalsPrompt
, editGoalieYtdWinsPrompt
) where ) where
import Control.Monad.Trans.State (modify) import Control.Monad.Trans.State (modify)
@ -64,3 +65,7 @@ editGoalieYtdMinsPrompt = numPrompt "Year-to-date minutes played: " $
editGoalieYtdGoalsPrompt :: Prompt editGoalieYtdGoalsPrompt :: Prompt
editGoalieYtdGoalsPrompt = numPrompt "Year-to-date goals allowed: " $ editGoalieYtdGoalsPrompt = numPrompt "Year-to-date goals allowed: " $
modify . editGoalieYtdGoals modify . editGoalieYtdGoals
-- | Prompt to edit a goalie's YTD wins
editGoalieYtdWinsPrompt :: Prompt
editGoalieYtdWinsPrompt = undefined