Editing name first draft

1 files changed, 4 insertions, 5 deletions

diff --git a/src/Model/Model.elm b/src/Model/Model.elm
index b929261..c45300b 100644
--- a/src/Model/Model.elm
+++ b/src/Model/Model.elm
@@ -10,7 +10,7 @@ import Time (Time)
 import List
 
 import Model.Timer (..)
-import Model.TimerEdition (..)
+import Model.Edition.Edition (..)
 import Model.Id (..)
 import Model.IdGenerator (..)
 
@@ -18,17 +18,16 @@ type alias Model =
   { currentTime : Time
   , timers : Dict Id Timer
   , timerIdGenerator : IdGenerator
-  , timerEdition : Maybe TimerEdition
+  , edition : Maybe Edition
   }
 
 initialModel : Time -> Model
 initialModel initialTime =
   let (id, idGenerator) = getId initialIdGenerator
-      timerName = "Timer " ++ (toString id)
   in  { currentTime = initialTime
-      , timers = Dict.insert id (initialTimer initialTime timerName) Dict.empty
+      , timers = Dict.insert id (initialTimer initialTime) Dict.empty
       , timerIdGenerator = idGenerator
-      , timerEdition = Nothing
+      , edition = Nothing
       }
 
 numberOfTimers : Model -> Int