From 1f06679a739ba0be3b6b91c10bfd762a06c9573a Mon Sep 17 00:00:00 2001
From: Joris Guyonvarch
Date: Sun, 10 May 2015 13:06:08 +0200
Subject: Migrationg to Elm 0.15

---
 src/Update/Update.elm        | 32 ++++++++++++++++----------------
 src/Update/UpdateEdition.elm |  6 +++---
 src/Update/UpdateTimer.elm   |  8 ++++----
 3 files changed, 23 insertions(+), 23 deletions(-)

(limited to 'src/Update')

diff --git a/src/Update/Update.elm b/src/Update/Update.elm
index 2f4d7a4..b4cf741 100644
--- a/src/Update/Update.elm
+++ b/src/Update/Update.elm
@@ -1,32 +1,32 @@
 module Update.Update
   ( Action(..)
-  , updates
+  , actions
   , logUpdate
   , update
   ) where
 
 import Signal
 import Dict
-import Dict (Dict)
-import Time (Time)
+import Dict exposing (Dict)
+import Time exposing (Time)
 import Maybe
-import Keyboard (KeyCode)
+import Keyboard exposing (KeyCode)
 import Char
 import List
 import Debug
 
-import Model.Model (..)
-import Model.Timer (..)
-import Model.Edition.Edition (..)
-import Model.Edition.NameEdition (..)
-import Model.Edition.TimeEdition (..)
-import Model.Id (..)
-import Model.IdGenerator (..)
+import Model.Model exposing (..)
+import Model.Timer exposing (..)
+import Model.Edition.Edition exposing (..)
+import Model.Edition.NameEdition exposing (..)
+import Model.Edition.TimeEdition exposing (..)
+import Model.Id exposing (..)
+import Model.IdGenerator exposing (..)
 
-import Update.UpdateTimer (..)
-import Update.UpdateEdition (..)
+import Update.UpdateTimer exposing (..)
+import Update.UpdateEdition exposing (..)
 
-import Utils.Maybe (..)
+import Utils.Maybe exposing (..)
 
 type Action =
   NoOp
@@ -39,8 +39,8 @@ type Action =
   | ClickAway
   | KeyPressed KeyCode
 
-updates : Signal.Channel Action
-updates = Signal.channel NoOp
+actions : Signal.Mailbox Action
+actions = Signal.mailbox NoOp
 
 logUpdate : Action -> Model -> Model
 logUpdate action model =
diff --git a/src/Update/UpdateEdition.elm b/src/Update/UpdateEdition.elm
index d94bd1e..47b0e22 100644
--- a/src/Update/UpdateEdition.elm
+++ b/src/Update/UpdateEdition.elm
@@ -4,11 +4,11 @@ module Update.UpdateEdition
   ) where
 
 import Char
-import Char (KeyCode)
+import Char exposing (KeyCode)
 
-import Model.Edition.Edition (..)
+import Model.Edition.Edition exposing (..)
 
-import Utils.List (..)
+import Utils.List exposing (..)
 
 type EditionAction =
   DeleteLast
diff --git a/src/Update/UpdateTimer.elm b/src/Update/UpdateTimer.elm
index 30603cd..49593d0 100644
--- a/src/Update/UpdateTimer.elm
+++ b/src/Update/UpdateTimer.elm
@@ -3,11 +3,11 @@ module Update.UpdateTimer
   , updateTimer
   ) where
 
-import Time (Time)
+import Time exposing (Time)
 
-import Model.Timer (..)
-import Model.TimerState (..)
-import Model.Id (..)
+import Model.Timer exposing (..)
+import Model.TimerState exposing (..)
+import Model.Id exposing (..)
 
 type TimerAction =
   Rename String
-- 
cgit v1.2.3