don't automatically update goal/assist stats
This commit is contained in:
parent
08c3382fe8
commit
66148a25d8
|
@ -227,12 +227,12 @@ recordAssistPrompt game goal assist = selectPlayerPrompt
|
||||||
++ "Goal: " ++ show goal ++ "\n"
|
++ "Goal: " ++ show goal ++ "\n"
|
||||||
++ "Assist #" ++ show assist ++ ": "
|
++ "Assist #" ++ show assist ++ ": "
|
||||||
) $ \case
|
) $ \case
|
||||||
Nothing -> modify recordGoalAssists
|
Nothing -> modify $ progMode.gameStateL.confirmGoalDataFlag .~ True
|
||||||
Just n -> do
|
Just n -> do
|
||||||
modify $ progMode.gameStateL.assistsBy %~ (++[n])
|
modify $ progMode.gameStateL.assistsBy %~ (++[n])
|
||||||
nAssists <- length <$> gets (view $ progMode.gameStateL.assistsBy)
|
nAssists <- length <$> gets (view $ progMode.gameStateL.assistsBy)
|
||||||
when (nAssists >= maxAssists) $
|
when (nAssists >= maxAssists) $
|
||||||
modify recordGoalAssists
|
modify $ progMode.gameStateL.confirmGoalDataFlag .~ True
|
||||||
|
|
||||||
drawSimplePrompt :: String -> ProgState -> C.Update ()
|
drawSimplePrompt :: String -> ProgState -> C.Update ()
|
||||||
drawSimplePrompt pStr s = C.drawString $ pStr ++ s^.inputBuffer
|
drawSimplePrompt pStr s = C.drawString $ pStr ++ s^.inputBuffer
|
||||||
|
|
Loading…
Reference in New Issue
Block a user