implemented Mtlstats.Control.EditGoalie.ytdLossesC
This commit is contained in:
parent
14da1096cd
commit
e50861613d
|
@ -91,7 +91,7 @@ ytdWinsC :: Controller
|
|||
ytdWinsC = promptController editGoalieYtdWinsPrompt
|
||||
|
||||
ytdLossesC :: Controller
|
||||
ytdLossesC = undefined
|
||||
ytdLossesC = promptController editGoalieYtdLossesPrompt
|
||||
|
||||
ytdTiesC :: Controller
|
||||
ytdTiesC = undefined
|
||||
|
|
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue
Block a user