aboutsummaryrefslogtreecommitdiff
path: root/src/Update/Update.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/Update/Update.elm')
-rw-r--r--src/Update/Update.elm3
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 }