implemented Mtlstats.Control.EditGoalie.ytdGoalsC
This commit is contained in:
@@ -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
|
||||||
|
|||||||
Reference in New Issue
Block a user