implemented Mtlstats.Control.EditGoalie.ytdLossesC

This commit is contained in:
Jonathan Lamothe 2019-11-14 01:49:22 -05:00
parent 14da1096cd
commit e50861613d
2 changed files with 6 additions and 1 deletions

View File

@ -91,7 +91,7 @@ ytdWinsC :: Controller
ytdWinsC = promptController editGoalieYtdWinsPrompt
ytdLossesC :: Controller
ytdLossesC = undefined
ytdLossesC = promptController editGoalieYtdLossesPrompt
ytdTiesC :: Controller
ytdTiesC = undefined

View File

@ -27,6 +27,7 @@ module Mtlstats.Prompt.EditGoalie
, editGoalieYtdMinsPrompt
, editGoalieYtdGoalsPrompt
, editGoalieYtdWinsPrompt
, editGoalieYtdLossesPrompt
) where
import Control.Monad.Trans.State (modify)
@ -70,3 +71,7 @@ editGoalieYtdGoalsPrompt = numPrompt "Year-to-date goals allowed: " $
editGoalieYtdWinsPrompt :: Prompt
editGoalieYtdWinsPrompt = numPrompt "Year-to-date wins: " $
modify . editGoalieYtdWins
-- | Prompt to edit a goalie's YTD losses
editGoalieYtdLossesPrompt :: Prompt
editGoalieYtdLossesPrompt = undefined