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

call selectGameGoalieC when goalie info entered for game

Browse Source
This commit is contained in:
Jonathan Lamothe 2019-11-04 02:50:10 -05:00
parent 2a9ff93642
commit 7fd837863b
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Mtlstats/Control/GoalieInput.hs
View File

@ -34,6 +34,7 @@ import Mtlstats.Util
-- | The dispatcher for handling goalie input -- | The dispatcher for handling goalie input
goalieInput :: GameState -> Controller goalieInput :: GameState -> Controller
goalieInput gs goalieInput gs
| gs^.gameGoaliesRecorded = selectGameGoalieC
| null $ gs^.gameSelectedGoalie = selectGoalieC | null $ gs^.gameSelectedGoalie = selectGoalieC
| null $ gs^.gameGoalieMinsPlayed = minsPlayedC | null $ gs^.gameGoalieMinsPlayed = minsPlayedC
| otherwise = goalsAllowedC | otherwise = goalsAllowedC
@ -47,6 +48,9 @@ minsPlayedC = promptControllerWith header goalieMinsPlayedPrompt
goalsAllowedC :: Controller goalsAllowedC :: Controller
goalsAllowedC = promptControllerWith header goalsAllowedPrompt goalsAllowedC = promptControllerWith header goalsAllowedPrompt
selectGameGoalieC :: Controller
selectGameGoalieC = undefined
header :: ProgState -> C.Update () header :: ProgState -> C.Update ()
header s = C.drawString $ unlines header s = C.drawString $ unlines
[ "*** GAME " ++ padNum 2 (s^.database.dbGames) ++ " ***" [ "*** GAME " ++ padNum 2 (s^.database.dbGames) ++ " ***"