implemented Mtlstats.Control.EditGoalie.ytdGamesC
This commit is contained in:
@@ -79,7 +79,7 @@ lifetimeMenuC :: Controller
|
|||||||
lifetimeMenuC = menuControllerWith header editGoalieLtMenu
|
lifetimeMenuC = menuControllerWith header editGoalieLtMenu
|
||||||
|
|
||||||
ytdGamesC :: Controller
|
ytdGamesC :: Controller
|
||||||
ytdGamesC = undefined
|
ytdGamesC = promptController editGoalieYtdGamesPrompt
|
||||||
|
|
||||||
ytdMinsC :: Controller
|
ytdMinsC :: Controller
|
||||||
ytdMinsC = undefined
|
ytdMinsC = undefined
|
||||||
|
|||||||
@@ -23,6 +23,7 @@ module Mtlstats.Prompt.EditGoalie
|
|||||||
( goalieToEditPrompt
|
( goalieToEditPrompt
|
||||||
, editGoalieNumberPrompt
|
, editGoalieNumberPrompt
|
||||||
, editGoalieNamePrompt
|
, editGoalieNamePrompt
|
||||||
|
, editGoalieYtdGamesPrompt
|
||||||
) where
|
) where
|
||||||
|
|
||||||
import Control.Monad.Trans.State (modify)
|
import Control.Monad.Trans.State (modify)
|
||||||
@@ -46,3 +47,7 @@ editGoalieNumberPrompt = numPrompt "Goalie number: " $
|
|||||||
editGoalieNamePrompt :: Prompt
|
editGoalieNamePrompt :: Prompt
|
||||||
editGoalieNamePrompt = strPrompt "Goalie name: " $
|
editGoalieNamePrompt = strPrompt "Goalie name: " $
|
||||||
modify . editGoalieName
|
modify . editGoalieName
|
||||||
|
|
||||||
|
-- | Prompt to edit a goalie's YTD games played
|
||||||
|
editGoalieYtdGamesPrompt :: Prompt
|
||||||
|
editGoalieYtdGamesPrompt = undefined
|
||||||
|
|||||||
Reference in New Issue
Block a user