diff options
Diffstat (limited to 'src/Update/Update.elm')
| -rw-r--r-- | src/Update/Update.elm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/Update/Update.elm b/src/Update/Update.elm index 8fd5cb3..87df965 100644 --- a/src/Update/Update.elm +++ b/src/Update/Update.elm @@ -83,7 +83,10 @@ update action model = Edit id kind -> { model | edition <- Just (newEdition id kind) - , timers <- Dict.update id (Maybe.map (updateTimer Pause)) model.timers + , timers <- + if kind == Time + then Dict.update id (Maybe.map (updateTimer Pause)) model.timers + else model.timers } ValidEdition -> validEdition model |