implemented Mtlstats.Control.EditGoalie.ltLossesC
This commit is contained in:
parent
2860309fc5
commit
ac3b8e9522
|
@ -109,7 +109,7 @@ ltWinsC :: Controller
|
|||
ltWinsC = promptController editGoalieLtWinsPrompt
|
||||
|
||||
ltLossesC :: Controller
|
||||
ltLossesC = undefined
|
||||
ltLossesC = promptController editGoalieLtLossesPrompt
|
||||
|
||||
ltTiesC :: Controller
|
||||
ltTiesC = undefined
|
||||
|
|
|
@ -33,6 +33,7 @@ module Mtlstats.Prompt.EditGoalie
|
|||
, editGoalieLtMinsPrompt
|
||||
, editGoalieLtGoalsPrompt
|
||||
, editGoalieLtWinsPrompt
|
||||
, editGoalieLtLossesPrompt
|
||||
) where
|
||||
|
||||
import Control.Monad.Trans.State (modify)
|
||||
|
@ -106,3 +107,7 @@ editGoalieLtGoalsPrompt = numPrompt "Lifetime goals allowed: " $
|
|||
editGoalieLtWinsPrompt :: Prompt
|
||||
editGoalieLtWinsPrompt = numPrompt "Lifetime wins: " $
|
||||
modify . editGoalieLtWins
|
||||
|
||||
-- | Prompt to edit a goalie's lifetime losses
|
||||
editGoalieLtLossesPrompt :: Prompt
|
||||
editGoalieLtLossesPrompt = undefined
|
||||
|
|
Loading…
Reference in New Issue
Block a user