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/Model/Edition/Edition.elm | 4 ++-- src/Model/Edition/NameEdition.elm | 2 +- src/Model/Edition/TimeEdition.elm | 8 ++++---- src/Model/IdGenerator.elm | 2 +- src/Model/Model.elm | 12 ++++++------ src/Model/Position.elm | 2 +- src/Model/Timer.elm | 4 ++-- 7 files changed, 17 insertions(+), 17 deletions(-) (limited to 'src/Model') diff --git a/src/Model/Edition/Edition.elm b/src/Model/Edition/Edition.elm index be7aa02..9a28253 100644 --- a/src/Model/Edition/Edition.elm +++ b/src/Model/Edition/Edition.elm @@ -6,10 +6,10 @@ module Model.Edition.Edition , isEmpty ) where -import Keyboard (KeyCode) +import Keyboard exposing (KeyCode) import String -import Model.Id (..) +import Model.Id exposing (..) import Model.Edition.NameEdition as NameEdition import Model.Edition.TimeEdition as TimeEdition diff --git a/src/Model/Edition/NameEdition.elm b/src/Model/Edition/NameEdition.elm index 89e5441..be7c6b3 100644 --- a/src/Model/Edition/NameEdition.elm +++ b/src/Model/Edition/NameEdition.elm @@ -4,7 +4,7 @@ module Model.Edition.NameEdition ) where import Char -import Keyboard (KeyCode) +import Keyboard exposing (KeyCode) import String import List diff --git a/src/Model/Edition/TimeEdition.elm b/src/Model/Edition/TimeEdition.elm index 2ba1628..3b70c3d 100644 --- a/src/Model/Edition/TimeEdition.elm +++ b/src/Model/Edition/TimeEdition.elm @@ -4,15 +4,15 @@ module Model.Edition.TimeEdition , toMinutesAndSeconds ) where -import Time (Time) +import Time exposing (Time) import List import Array import String -import Keyboard (KeyCode) +import Keyboard exposing (KeyCode) import Char -import Utils.List (..) -import Utils.Maybe (..) +import Utils.List exposing (..) +import Utils.Maybe exposing (..) keyCodeToChar : KeyCode -> Maybe Char keyCodeToChar code = diff --git a/src/Model/IdGenerator.elm b/src/Model/IdGenerator.elm index ba760d8..9001191 100644 --- a/src/Model/IdGenerator.elm +++ b/src/Model/IdGenerator.elm @@ -4,7 +4,7 @@ module Model.IdGenerator , getId ) where -import Model.Id (..) +import Model.Id exposing (..) type alias IdGenerator = { counter : Id diff --git a/src/Model/Model.elm b/src/Model/Model.elm index c45300b..a660b16 100644 --- a/src/Model/Model.elm +++ b/src/Model/Model.elm @@ -4,15 +4,15 @@ module Model.Model , numberOfTimers ) where -import Dict (Dict) +import Dict exposing (Dict) import Dict -import Time (Time) +import Time exposing (Time) import List -import Model.Timer (..) -import Model.Edition.Edition (..) -import Model.Id (..) -import Model.IdGenerator (..) +import Model.Timer exposing (..) +import Model.Edition.Edition exposing (..) +import Model.Id exposing (..) +import Model.IdGenerator exposing (..) type alias Model = { currentTime : Time diff --git a/src/Model/Position.elm b/src/Model/Position.elm index b73a3d9..d15e853 100644 --- a/src/Model/Position.elm +++ b/src/Model/Position.elm @@ -2,7 +2,7 @@ module Model.Position ( positionEncoder ) where -import Json.Encode (..) +import Json.Encode exposing (..) positionEncoder : (Int, Int) -> Value positionEncoder (x, y) = diff --git a/src/Model/Timer.elm b/src/Model/Timer.elm index 35850fc..20c0ea8 100644 --- a/src/Model/Timer.elm +++ b/src/Model/Timer.elm @@ -5,9 +5,9 @@ module Model.Timer ) where import List -import Time (Time) +import Time exposing (Time) -import Model.TimerState (..) +import Model.TimerState exposing (..) type alias Timer = { creationTime : Time -- cgit v1.2.3