implemented minsPlayedC

This commit is contained in:
Jonathan Lamothe
2019-10-30 23:41:55 -04:00
parent 1c692a21f0
commit a6395ada9c
2 changed files with 27 additions and 2 deletions

View File

@@ -45,7 +45,8 @@ module Mtlstats.Prompt (
assignPMinsPrompt,
goalieNumPrompt,
goalieNamePrompt,
selectGameGoaliePrompt
selectGameGoaliePrompt,
goalieMinsPlayedPrompt
) where
import Control.Monad (when)
@@ -310,5 +311,9 @@ selectGameGoaliePrompt = selectGoaliePrompt "Which goalie played this game: " $
Nothing -> modify $ progMode.gameStateL.goaliesRecorded .~ True
Just n -> modify $ progMode.gameStateL.gameSelectedGoalie ?~ n
-- | Prompts for the number of minutes the goalie has played
goalieMinsPlayedPrompt :: Prompt
goalieMinsPlayedPrompt = undefined
drawSimplePrompt :: String -> ProgState -> C.Update ()
drawSimplePrompt pStr s = C.drawString $ pStr ++ s^.inputBuffer