implemented Mtlstats.Control.EditGoalie.ytdTiesC
This commit is contained in:
parent
4655cb37b9
commit
b8aa00aa81
|
@ -94,7 +94,7 @@ ytdLossesC :: Controller
|
|||
ytdLossesC = promptController editGoalieYtdLossesPrompt
|
||||
|
||||
ytdTiesC :: Controller
|
||||
ytdTiesC = undefined
|
||||
ytdTiesC = promptController editGoalieYtdTiesPrompt
|
||||
|
||||
ltGamesC :: Controller
|
||||
ltGamesC = undefined
|
||||
|
|
|
@ -28,6 +28,7 @@ module Mtlstats.Prompt.EditGoalie
|
|||
, editGoalieYtdGoalsPrompt
|
||||
, editGoalieYtdWinsPrompt
|
||||
, editGoalieYtdLossesPrompt
|
||||
, editGoalieYtdTiesPrompt
|
||||
) where
|
||||
|
||||
import Control.Monad.Trans.State (modify)
|
||||
|
@ -76,3 +77,7 @@ editGoalieYtdWinsPrompt = numPrompt "Year-to-date wins: " $
|
|||
editGoalieYtdLossesPrompt :: Prompt
|
||||
editGoalieYtdLossesPrompt = numPrompt "Year-to-date losses: " $
|
||||
modify . editGoalieYtdLosses
|
||||
|
||||
-- | Prompt to edit a goalie's YTD ties
|
||||
editGoalieYtdTiesPrompt :: Prompt
|
||||
editGoalieYtdTiesPrompt = undefined
|
||||
|
|
Loading…
Reference in New Issue
Block a user