From 0075abf51db5d1b54117525d7a7f9b06e31c9484 Mon Sep 17 00:00:00 2001
From: Joris Guyonvarch
Date: Tue, 17 Mar 2015 21:26:40 +0100
Subject: Adding an edition mode for a timer

---
 src/Model/Model.elm | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'src/Model/Model.elm')

diff --git a/src/Model/Model.elm b/src/Model/Model.elm
index 9a20219..b7ac48a 100644
--- a/src/Model/Model.elm
+++ b/src/Model/Model.elm
@@ -9,6 +9,7 @@ import Dict
 import Time (Time)
 
 import Model.Timer (..)
+import Model.TimerEdition (..)
 import Model.Id (..)
 import Model.IdGenerator (..)
 
@@ -16,6 +17,7 @@ type alias Model =
   { currentTime : Time
   , timers : Dict Id Timer
   , timerIdGenerator : IdGenerator
+  , timerEdition : Maybe TimerEdition
   }
 
 initialModel : Time -> Model
@@ -25,6 +27,7 @@ initialModel initialTime =
   in  { currentTime = initialTime
       , timers = Dict.insert id (initialTimer initialTime timerName) Dict.empty
       , timerIdGenerator = idGenerator
+      , timerEdition = Nothing
       }
 
 substractTimersTime : Time -> Dict Id Timer -> Dict Id Timer
-- 
cgit v1.2.3