implemented Mtlstats.Control.EditGoalie.ytdGoalsC
This commit is contained in:
parent
023430d737
commit
5dcd140280
|
@ -85,7 +85,7 @@ ytdMinsC :: Controller
|
||||||
ytdMinsC = promptController editGoalieYtdMinsPrompt
|
ytdMinsC = promptController editGoalieYtdMinsPrompt
|
||||||
|
|
||||||
ytdGoalsC :: Controller
|
ytdGoalsC :: Controller
|
||||||
ytdGoalsC = undefined
|
ytdGoalsC = promptController editGoalieYtdGoalsPrompt
|
||||||
|
|
||||||
ytdWinsC :: Controller
|
ytdWinsC :: Controller
|
||||||
ytdWinsC = undefined
|
ytdWinsC = undefined
|
||||||
|
|
|
@ -25,6 +25,7 @@ module Mtlstats.Prompt.EditGoalie
|
||||||
, editGoalieNamePrompt
|
, editGoalieNamePrompt
|
||||||
, editGoalieYtdGamesPrompt
|
, editGoalieYtdGamesPrompt
|
||||||
, editGoalieYtdMinsPrompt
|
, editGoalieYtdMinsPrompt
|
||||||
|
, editGoalieYtdGoalsPrompt
|
||||||
) where
|
) where
|
||||||
|
|
||||||
import Control.Monad.Trans.State (modify)
|
import Control.Monad.Trans.State (modify)
|
||||||
|
@ -58,3 +59,7 @@ editGoalieYtdGamesPrompt = numPrompt "Year-to-date games played: " $
|
||||||
editGoalieYtdMinsPrompt :: Prompt
|
editGoalieYtdMinsPrompt :: Prompt
|
||||||
editGoalieYtdMinsPrompt = numPrompt "Year-to-date minutes played: " $
|
editGoalieYtdMinsPrompt = numPrompt "Year-to-date minutes played: " $
|
||||||
modify . editGoalieYtdMins
|
modify . editGoalieYtdMins
|
||||||
|
|
||||||
|
-- | Prompt to edit a goalie's YTD goales allowed
|
||||||
|
editGoalieYtdGoalsPrompt :: Prompt
|
||||||
|
editGoalieYtdGoalsPrompt = undefined
|
||||||
|
|
Loading…
Reference in New Issue
Block a user