aboutsummaryrefslogtreecommitdiff
path: root/src/Model/Model.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/Model/Model.elm')
-rw-r--r--src/Model/Model.elm9
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