implemented editGoalieLtWins

This commit is contained in:
Jonathan Lamothe
2019-11-14 02:45:31 -05:00
parent dd34429f59
commit 2860309fc5
2 changed files with 33 additions and 1 deletions

View File

@@ -135,7 +135,7 @@ editGoalieLtWins
-- ^ The number of wins
-> ProgState
-> ProgState
editGoalieLtWins = undefined
editGoalieLtWins wins = editGoalie (gLifetime.gsWins .~ wins) EGLifetime
editGoalie :: (Goalie -> Goalie) -> EditGoalieMode -> ProgState -> ProgState
editGoalie f mode s = fromMaybe s $ do