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/Model | |
parent | cf26834c717043685866b47eb95bcd8d1299a78b (diff) |
Migrationg to Elm 0.15
Diffstat (limited to 'src/Model')
-rw-r--r-- | src/Model/Edition/Edition.elm | 4 | ||||
-rw-r--r-- | src/Model/Edition/NameEdition.elm | 2 | ||||
-rw-r--r-- | src/Model/Edition/TimeEdition.elm | 8 | ||||
-rw-r--r-- | src/Model/IdGenerator.elm | 2 | ||||
-rw-r--r-- | src/Model/Model.elm | 12 | ||||
-rw-r--r-- | src/Model/Position.elm | 2 | ||||
-rw-r--r-- | src/Model/Timer.elm | 4 |
7 files changed, 17 insertions, 17 deletions
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 |