diff options
author | Joris Guyonvarch | 2015-05-10 13:06:08 +0200 |
---|---|---|
committer | Joris Guyonvarch | 2015-05-10 13:06:08 +0200 |
commit | 1f06679a739ba0be3b6b91c10bfd762a06c9573a (patch) | |
tree | 060353b47ddb4e2ad1f366015d70a0d712149c23 /src/Update/Update.elm | |
parent | cf26834c717043685866b47eb95bcd8d1299a78b (diff) |
Migrationg to Elm 0.15
Diffstat (limited to 'src/Update/Update.elm')
-rw-r--r-- | src/Update/Update.elm | 32 |
1 files changed, 16 insertions, 16 deletions
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 = |