implemented editGoalieYtdWins

This commit is contained in:
Jonathan Lamothe
2019-11-14 01:47:15 -05:00
parent a8a5d6a305
commit 14da1096cd
2 changed files with 33 additions and 1 deletions

View File

@@ -81,7 +81,7 @@ editGoalieYtdWins
-- ^ The number of wins
-> ProgState
-> ProgState
editGoalieYtdWins = undefined
editGoalieYtdWins wins = editGoalie (gYtd.gsWins .~ wins) EGYtd
editGoalie :: (Goalie -> Goalie) -> EditGoalieMode -> ProgState -> ProgState
editGoalie f mode s = fromMaybe s $ do