diff options
Diffstat (limited to 'src/Update')
| -rw-r--r-- | src/Update/Update.elm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Update/Update.elm b/src/Update/Update.elm index 0252fc8..635e29d 100644 --- a/src/Update/Update.elm +++ b/src/Update/Update.elm @@ -22,6 +22,7 @@ type Action = | AddNewTimer | DeltaTime Time | UpdateTimer Id TimerAction + | RemoveTimer Id updates : Signal.Channel Action updates = Signal.channel NoOp @@ -46,3 +47,5 @@ update action model = } UpdateTimer id action -> { model | timers <- Dict.update id (Maybe.map (updateTimer action)) model.timers } + RemoveTimer id -> + { model | timers <- Dict.remove id model.timers } |