implemented editGoalieLtMins

This commit is contained in:
Jonathan Lamothe
2019-11-14 02:26:55 -05:00
parent 30cfea0503
commit 3a1480115d
2 changed files with 33 additions and 1 deletions

View File

@@ -117,7 +117,7 @@ editGoalieLtMins
-- ^ The number of minutes
-> ProgState
-> ProgState
editGoalieLtMins = undefined
editGoalieLtMins mins = editGoalie (gLifetime.gsMinsPlayed .~ mins) EGLifetime
editGoalie :: (Goalie -> Goalie) -> EditGoalieMode -> ProgState -> ProgState
editGoalie f mode s = fromMaybe s $ do