implemented Mtlstats.Control.EditGoalie.ytdLossesC
This commit is contained in:
parent
14da1096cd
commit
e50861613d
|
@ -91,7 +91,7 @@ ytdWinsC :: Controller
|
||||||
ytdWinsC = promptController editGoalieYtdWinsPrompt
|
ytdWinsC = promptController editGoalieYtdWinsPrompt
|
||||||
|
|
||||||
ytdLossesC :: Controller
|
ytdLossesC :: Controller
|
||||||
ytdLossesC = undefined
|
ytdLossesC = promptController editGoalieYtdLossesPrompt
|
||||||
|
|
||||||
ytdTiesC :: Controller
|
ytdTiesC :: Controller
|
||||||
ytdTiesC = undefined
|
ytdTiesC = undefined
|
||||||
|
|
|
@ -27,6 +27,7 @@ module Mtlstats.Prompt.EditGoalie
|
||||||
, editGoalieYtdMinsPrompt
|
, editGoalieYtdMinsPrompt
|
||||||
, editGoalieYtdGoalsPrompt
|
, editGoalieYtdGoalsPrompt
|
||||||
, editGoalieYtdWinsPrompt
|
, editGoalieYtdWinsPrompt
|
||||||
|
, editGoalieYtdLossesPrompt
|
||||||
) where
|
) where
|
||||||
|
|
||||||
import Control.Monad.Trans.State (modify)
|
import Control.Monad.Trans.State (modify)
|
||||||
|
@ -70,3 +71,7 @@ editGoalieYtdGoalsPrompt = numPrompt "Year-to-date goals allowed: " $
|
||||||
editGoalieYtdWinsPrompt :: Prompt
|
editGoalieYtdWinsPrompt :: Prompt
|
||||||
editGoalieYtdWinsPrompt = numPrompt "Year-to-date wins: " $
|
editGoalieYtdWinsPrompt = numPrompt "Year-to-date wins: " $
|
||||||
modify . editGoalieYtdWins
|
modify . editGoalieYtdWins
|
||||||
|
|
||||||
|
-- | Prompt to edit a goalie's YTD losses
|
||||||
|
editGoalieYtdLossesPrompt :: Prompt
|
||||||
|
editGoalieYtdLossesPrompt = undefined
|
||||||
|
|
Loading…
Reference in New Issue
Block a user