From 1ecd777c185cacbf640dc3ab46b84065ef3b40d9 Mon Sep 17 00:00:00 2001 From: Joris Guyonvarch Date: Sun, 22 Mar 2015 13:54:32 +0100 Subject: Do not pause a timer when editing its name --- src/Update/Update.elm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'src/Update') 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 -- cgit v1.2.3