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

only search through active players/goalies on game input

This commit is contained in:
Jonathan Lamothe 2020-04-06 15:14:48 -04:00
parent 4f147cd5a4
commit ed240c6a38
2 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/Mtlstats/Prompt/NewGame.hs
View File

@ -76,7 +76,7 @@ recordGoalPrompt
-> Int -> Int
-- ^ The goal number -- ^ The goal number
-> Prompt -> Prompt
recordGoalPrompt game goal = selectPlayerPrompt recordGoalPrompt game goal = selectActivePlayerPrompt
( "*** GAME " ++ padNum 2 game ++ " ***\n" ( "*** GAME " ++ padNum 2 game ++ " ***\n"
++ "Who scored goal number " ++ show goal ++ "? " ++ "Who scored goal number " ++ show goal ++ "? "
) $ modify . (progMode.gameStateL.goalBy .~) ) $ modify . (progMode.gameStateL.goalBy .~)
@ -90,7 +90,7 @@ recordAssistPrompt
-> Int -> Int
-- ^ The assist number -- ^ The assist number
-> Prompt -> Prompt
recordAssistPrompt game goal assist = selectPlayerPrompt recordAssistPrompt game goal assist = selectActivePlayerPrompt
( "*** GAME " ++ padNum 2 game ++ " ***\n" ( "*** GAME " ++ padNum 2 game ++ " ***\n"
++ "Goal: " ++ show goal ++ "\n" ++ "Goal: " ++ show goal ++ "\n"
++ "Assist #" ++ show assist ++ ": " ++ "Assist #" ++ show assist ++ ": "
@ -104,7 +104,7 @@ recordAssistPrompt game goal assist = selectPlayerPrompt
-- | Prompts for the player to assign penalty minutes to -- | Prompts for the player to assign penalty minutes to
pMinPlayerPrompt :: Prompt pMinPlayerPrompt :: Prompt
pMinPlayerPrompt = selectPlayerPrompt pMinPlayerPrompt = selectActivePlayerPrompt
"Assign penalty minutes to: " $ "Assign penalty minutes to: " $
\case \case
Nothing -> modify $ progMode.gameStateL.gamePMinsRecorded .~ True Nothing -> modify $ progMode.gameStateL.gamePMinsRecorded .~ True

3
src/Mtlstats/Prompt/NewGame/GoalieInput.hs
View File

@ -36,7 +36,8 @@ import Mtlstats.Types
-- | Prompts for a goalie who played in the game -- | Prompts for a goalie who played in the game
selectGameGoaliePrompt :: Prompt selectGameGoaliePrompt :: Prompt
selectGameGoaliePrompt = selectGoaliePrompt "Which goalie played this game: " $ selectGameGoaliePrompt = selectActiveGoaliePrompt
"Which goalie played this game: " $
\case \case
Nothing -> modify finishGoalieEntry Nothing -> modify finishGoalieEntry
Just n -> modify $ progMode.gameStateL.gameSelectedGoalie ?~ n Just n -> modify $ progMode.gameStateL.gameSelectedGoalie ?~ n