implemented Mtlstats.Control.EditGoalie.ltTiesC

This commit is contained in:
Jonathan Lamothe 2019-11-14 02:55:50 -05:00
parent 9456102935
commit aac2752e95
2 changed files with 6 additions and 1 deletions

View File

@ -112,7 +112,7 @@ ltLossesC :: Controller
ltLossesC = promptController editGoalieLtLossesPrompt
ltTiesC :: Controller
ltTiesC = undefined
ltTiesC = promptController editGoalieLtTiesPrompt
header :: ProgState -> C.Update ()
header s = C.drawString $ fromMaybe "" $ do

View File

@ -34,6 +34,7 @@ module Mtlstats.Prompt.EditGoalie
, editGoalieLtGoalsPrompt
, editGoalieLtWinsPrompt
, editGoalieLtLossesPrompt
, editGoalieLtTiesPrompt
) where
import Control.Monad.Trans.State (modify)
@ -112,3 +113,7 @@ editGoalieLtWinsPrompt = numPrompt "Lifetime wins: " $
editGoalieLtLossesPrompt :: Prompt
editGoalieLtLossesPrompt = numPrompt "Lifetime losses: " $
modify . editGoalieLtLosses
-- | Prompt to edit a goalie's lifetime ties
editGoalieLtTiesPrompt :: Prompt
editGoalieLtTiesPrompt = undefined