From 4fa707bc0f3a250be396563adb5dca4472513ad8 Mon Sep 17 00:00:00 2001 From: Jonathan Lamothe Date: Wed, 30 Oct 2019 23:58:51 -0400 Subject: [PATCH] implemented goalieMinsPlayedPrompt --- src/Mtlstats/Prompt.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/Mtlstats/Prompt.hs b/src/Mtlstats/Prompt.hs index 17a36dd..4246de0 100644 --- a/src/Mtlstats/Prompt.hs +++ b/src/Mtlstats/Prompt.hs @@ -313,7 +313,8 @@ selectGameGoaliePrompt = selectGoaliePrompt "Which goalie played this game: " $ -- | Prompts for the number of minutes the goalie has played goalieMinsPlayedPrompt :: Prompt -goalieMinsPlayedPrompt = undefined +goalieMinsPlayedPrompt = numPrompt "Minutes played: " $ + modify . (progMode.gameStateL.goalieMinsPlayed ?~) drawSimplePrompt :: String -> ProgState -> C.Update () drawSimplePrompt pStr s = C.drawString $ pStr ++ s^.inputBuffer