implemented Mtlstats.Control.EditGoalie.ytdMinsC
This commit is contained in:
parent
203650397e
commit
1b9c072a76
|
@ -82,7 +82,7 @@ ytdGamesC :: Controller
|
||||||
ytdGamesC = promptController editGoalieYtdGamesPrompt
|
ytdGamesC = promptController editGoalieYtdGamesPrompt
|
||||||
|
|
||||||
ytdMinsC :: Controller
|
ytdMinsC :: Controller
|
||||||
ytdMinsC = undefined
|
ytdMinsC = promptController editGoalieYtdMinsPrompt
|
||||||
|
|
||||||
ytdGoalsC :: Controller
|
ytdGoalsC :: Controller
|
||||||
ytdGoalsC = undefined
|
ytdGoalsC = undefined
|
||||||
|
|
|
@ -24,6 +24,7 @@ module Mtlstats.Prompt.EditGoalie
|
||||||
, editGoalieNumberPrompt
|
, editGoalieNumberPrompt
|
||||||
, editGoalieNamePrompt
|
, editGoalieNamePrompt
|
||||||
, editGoalieYtdGamesPrompt
|
, editGoalieYtdGamesPrompt
|
||||||
|
, editGoalieYtdMinsPrompt
|
||||||
) where
|
) where
|
||||||
|
|
||||||
import Control.Monad.Trans.State (modify)
|
import Control.Monad.Trans.State (modify)
|
||||||
|
@ -52,3 +53,7 @@ editGoalieNamePrompt = strPrompt "Goalie name: " $
|
||||||
editGoalieYtdGamesPrompt :: Prompt
|
editGoalieYtdGamesPrompt :: Prompt
|
||||||
editGoalieYtdGamesPrompt = numPrompt "Year-to-date games played: " $
|
editGoalieYtdGamesPrompt = numPrompt "Year-to-date games played: " $
|
||||||
modify . editGoalieYtdGames
|
modify . editGoalieYtdGames
|
||||||
|
|
||||||
|
-- | Prompt to edit a goalie's YTD minutes played
|
||||||
|
editGoalieYtdMinsPrompt :: Prompt
|
||||||
|
editGoalieYtdMinsPrompt = undefined
|
||||||
|
|
Loading…
Reference in New Issue
Block a user