fingerprint/mtlstats
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

implemented Mtlstats.Control.EditGoalie.ltTiesC

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Mtlstats/Control/EditGoalie.hs
View File

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

5
src/Mtlstats/Prompt/EditGoalie.hs
View File

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