From 8e3a7bf1cb83bbb6e3dcd54308eefa52a29cd679 Mon Sep 17 00:00:00 2001 From: Joris Date: Fri, 3 Jun 2016 20:27:16 +0200 Subject: Migrate to elm 0.17 --- src/client/elm/Model/Conf.elm | 4 ++-- src/client/elm/Model/Date.elm | 4 ++-- src/client/elm/Model/Income.elm | 4 ++-- src/client/elm/Model/Init.elm | 4 ++-- src/client/elm/Model/InitResult.elm | 4 ++-- src/client/elm/Model/Payer.elm | 4 ++-- src/client/elm/Model/Payment.elm | 4 ++-- src/client/elm/Model/Translations.elm | 4 ++-- src/client/elm/Model/User.elm | 4 ++-- src/client/elm/Model/View.elm | 4 ++-- 10 files changed, 20 insertions(+), 20 deletions(-) (limited to 'src/client/elm/Model') diff --git a/src/client/elm/Model/Conf.elm b/src/client/elm/Model/Conf.elm index ad71d83..ec04622 100644 --- a/src/client/elm/Model/Conf.elm +++ b/src/client/elm/Model/Conf.elm @@ -1,7 +1,7 @@ -module Model.Conf +module Model.Conf exposing ( Conf , confDecoder - ) where + ) import Json.Decode exposing (..) diff --git a/src/client/elm/Model/Date.elm b/src/client/elm/Model/Date.elm index 1c56de4..f3c9b91 100644 --- a/src/client/elm/Model/Date.elm +++ b/src/client/elm/Model/Date.elm @@ -1,7 +1,7 @@ -module Model.Date +module Model.Date exposing ( timeDecoder , dateDecoder - ) where + ) import Date as Date exposing (Date) import Time exposing (Time) diff --git a/src/client/elm/Model/Income.elm b/src/client/elm/Model/Income.elm index ea990e2..c0039e9 100644 --- a/src/client/elm/Model/Income.elm +++ b/src/client/elm/Model/Income.elm @@ -1,4 +1,4 @@ -module Model.Income +module Model.Income exposing ( Incomes , Income , IncomeId @@ -7,7 +7,7 @@ module Model.Income , incomeDefinedForAll , userCumulativeIncomeSince , cumulativeIncomesSince - ) where + ) import Json.Decode as Json exposing ((:=)) import Time exposing (Time, hour) diff --git a/src/client/elm/Model/Init.elm b/src/client/elm/Model/Init.elm index 5db038d..3a86dba 100644 --- a/src/client/elm/Model/Init.elm +++ b/src/client/elm/Model/Init.elm @@ -1,7 +1,7 @@ -module Model.Init +module Model.Init exposing ( Init , initDecoder - ) where + ) import Json.Decode as Json exposing ((:=)) diff --git a/src/client/elm/Model/InitResult.elm b/src/client/elm/Model/InitResult.elm index d1f1348..c8da533 100644 --- a/src/client/elm/Model/InitResult.elm +++ b/src/client/elm/Model/InitResult.elm @@ -1,7 +1,7 @@ -module Model.InitResult +module Model.InitResult exposing ( InitResult(..) , initResultDecoder - ) where + ) import Json.Decode as Json exposing ((:=)) diff --git a/src/client/elm/Model/Payer.elm b/src/client/elm/Model/Payer.elm index 72f13b1..2c067bc 100644 --- a/src/client/elm/Model/Payer.elm +++ b/src/client/elm/Model/Payer.elm @@ -1,10 +1,10 @@ -module Model.Payer +module Model.Payer exposing ( Payers , Payer , ExceedingPayer , getOrderedExceedingPayers , useIncomesFrom - ) where + ) import Json.Decode as Json exposing (..) import Dict exposing (..) diff --git a/src/client/elm/Model/Payment.elm b/src/client/elm/Model/Payment.elm index 013fc95..4f0f85a 100644 --- a/src/client/elm/Model/Payment.elm +++ b/src/client/elm/Model/Payment.elm @@ -1,4 +1,4 @@ -module Model.Payment +module Model.Payment exposing ( perPage , Payments , Payment @@ -11,7 +11,7 @@ module Model.Payment , punctual , monthly , groupAndSortByMonth - ) where + ) import Date exposing (..) import Json.Decode as Json exposing ((:=)) diff --git a/src/client/elm/Model/Translations.elm b/src/client/elm/Model/Translations.elm index dbf378c..705cb66 100644 --- a/src/client/elm/Model/Translations.elm +++ b/src/client/elm/Model/Translations.elm @@ -1,10 +1,10 @@ -module Model.Translations +module Model.Translations exposing ( translationsDecoder , Translations , Translation , getMessage , getParamMessage - ) where + ) import Maybe exposing (withDefault) import Json.Decode as Json exposing ((:=)) diff --git a/src/client/elm/Model/User.elm b/src/client/elm/Model/User.elm index aac5dd5..02f2cea 100644 --- a/src/client/elm/Model/User.elm +++ b/src/client/elm/Model/User.elm @@ -1,4 +1,4 @@ -module Model.User +module Model.User exposing ( Users , usersDecoder , User @@ -6,7 +6,7 @@ module Model.User , UserId , userIdDecoder , getUserName - ) where + ) import Json.Decode as Json exposing ((:=)) import Dict exposing (Dict) diff --git a/src/client/elm/Model/View.elm b/src/client/elm/Model/View.elm index 475e826..61d42a7 100644 --- a/src/client/elm/Model/View.elm +++ b/src/client/elm/Model/View.elm @@ -1,6 +1,6 @@ -module Model.View +module Model.View exposing ( View(..) - ) where + ) import Model.Payment exposing (Payments) -- cgit v1.2.3