diff options
| author | Joris Guyonvarch | 2015-03-22 13:54:32 +0100 |
|---|---|---|
| committer | Joris Guyonvarch | 2015-03-22 13:54:32 +0100 |
| commit | 1ecd777c185cacbf640dc3ab46b84065ef3b40d9 (patch) | |
| tree | 6a6ae23def8e4fb8fce67c9a3c2bd18cc2f8c6ae /src/Update/Update.elm | |
| parent | 7037f04e3118346e9b7510e90e1ef98bbcab0f3f (diff) | |
Do not pause a timer when editing its name
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 |