renamed variable
This commit is contained in:
parent
dcbb809ae1
commit
50389b4f4c
|
@ -177,8 +177,8 @@ assignPMins mins s = fromMaybe s $ do
|
||||||
-- goals
|
-- goals
|
||||||
awardShutouts :: ProgState -> ProgState
|
awardShutouts :: ProgState -> ProgState
|
||||||
awardShutouts s = foldl
|
awardShutouts s = foldl
|
||||||
(\gs (gid, stats) -> if stats^.gsGoalsAllowed == 0
|
(\s' (gid, stats) -> if stats^.gsGoalsAllowed == 0
|
||||||
then gs
|
then s'
|
||||||
& database.dbGoalies %~ modifyNth gid
|
& database.dbGoalies %~ modifyNth gid
|
||||||
( ( gYtd.gsShutouts %~ succ )
|
( ( gYtd.gsShutouts %~ succ )
|
||||||
. ( gLifetime.gsShutouts %~ succ )
|
. ( gLifetime.gsShutouts %~ succ )
|
||||||
|
@ -186,6 +186,6 @@ awardShutouts s = foldl
|
||||||
& progMode.gameStateL.gameGoalieStats %~ M.adjust
|
& progMode.gameStateL.gameGoalieStats %~ M.adjust
|
||||||
(gsShutouts %~ succ)
|
(gsShutouts %~ succ)
|
||||||
gid
|
gid
|
||||||
else gs)
|
else s')
|
||||||
s
|
s
|
||||||
(M.toList $ s^.progMode.gameStateL.gameGoalieStats)
|
(M.toList $ s^.progMode.gameStateL.gameGoalieStats)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user