diff options
-rw-r--r-- | src/client/elm/LoggedIn/Account/View.elm | 6 | ||||
-rw-r--r-- | src/client/elm/LoggedIn/Model.elm | 3 | ||||
-rw-r--r-- | src/client/elm/LoggedIn/Model/Payer.elm (renamed from src/client/elm/Model/Payer.elm) | 2 | ||||
-rw-r--r-- | src/client/elm/LoggedIn/Monthly/View.elm | 4 | ||||
-rw-r--r-- | src/client/elm/LoggedIn/View/Date.elm (renamed from src/client/elm/View/Date.elm) | 2 | ||||
-rw-r--r-- | src/client/elm/LoggedIn/View/Expand.elm (renamed from src/client/elm/View/Expand.elm) | 2 | ||||
-rw-r--r-- | src/client/elm/LoggedIn/View/Price.elm (renamed from src/client/elm/View/Price.elm) | 2 | ||||
-rw-r--r-- | src/client/elm/LoggedIn/View/Table.elm | 4 |
8 files changed, 13 insertions, 12 deletions
diff --git a/src/client/elm/LoggedIn/Account/View.elm b/src/client/elm/LoggedIn/Account/View.elm index d074c41..5d96da6 100644 --- a/src/client/elm/LoggedIn/Account/View.elm +++ b/src/client/elm/LoggedIn/Account/View.elm @@ -12,18 +12,18 @@ import Html.Events exposing (..) import LoggedIn.Action as LoggedInAction import LoggedIn.Model as LoggedInModel +import LoggedIn.Model.Payer exposing (..) +import LoggedIn.View.Price exposing (price) +import LoggedIn.View.Expand exposing (..) import LoggedIn.Account.Action as AccountAction import LoggedIn.Account.Model as AccountModel import Model exposing (Model) import Model.User exposing (getUserName) -import Model.Payer exposing (..) import Model.Translations exposing (getParamMessage, getMessage) import Action exposing (..) -import View.Expand exposing (..) -import View.Price exposing (price) import View.Events exposing (onSubmitPrevDefault) import Utils.Either exposing (toMaybeError) diff --git a/src/client/elm/LoggedIn/Model.elm b/src/client/elm/LoggedIn/Model.elm index a268afc..4d85e68 100644 --- a/src/client/elm/LoggedIn/Model.elm +++ b/src/client/elm/LoggedIn/Model.elm @@ -3,9 +3,10 @@ module LoggedIn.Model , init ) where +import LoggedIn.Model.Payer exposing (Payers) + import Model.User exposing (Users, UserId) import Model.Payment exposing (PaymentId, Payments, PaymentFrequency(..)) -import Model.Payer exposing (Payers) import Model.Init exposing (..) import LoggedIn.Account.Model as AccountModel diff --git a/src/client/elm/Model/Payer.elm b/src/client/elm/LoggedIn/Model/Payer.elm index 9ae1dfa..9242610 100644 --- a/src/client/elm/Model/Payer.elm +++ b/src/client/elm/LoggedIn/Model/Payer.elm @@ -1,4 +1,4 @@ -module Model.Payer +module LoggedIn.Model.Payer ( Payers , Payer , ExceedingPayer diff --git a/src/client/elm/LoggedIn/Monthly/View.elm b/src/client/elm/LoggedIn/Monthly/View.elm index 6fc90b2..f4ae2c9 100644 --- a/src/client/elm/LoggedIn/Monthly/View.elm +++ b/src/client/elm/LoggedIn/Monthly/View.elm @@ -11,6 +11,8 @@ import Html.Events exposing (..) import LoggedIn.Action as LoggedInAction import LoggedIn.Model as LoggedInModel +import LoggedIn.View.Price exposing (price) +import LoggedIn.View.Expand exposing (..) import LoggedIn.Monthly.Action as MonthlyAction import LoggedIn.Monthly.Model as MonthlyModel @@ -21,8 +23,6 @@ import Model.Translations exposing (getMessage, getParamMessage) import Action exposing (..) import View.Icon exposing (renderIcon) -import View.Expand exposing (..) -import View.Price exposing (price) view : Address Action -> Model -> LoggedInModel.Model -> Html view address model loggedInModel = diff --git a/src/client/elm/View/Date.elm b/src/client/elm/LoggedIn/View/Date.elm index 81c5112..62c8be5 100644 --- a/src/client/elm/View/Date.elm +++ b/src/client/elm/LoggedIn/View/Date.elm @@ -1,4 +1,4 @@ -module View.Date +module LoggedIn.View.Date ( renderShortDate , renderLongDate ) where diff --git a/src/client/elm/View/Expand.elm b/src/client/elm/LoggedIn/View/Expand.elm index 53b4fe5..1055c1b 100644 --- a/src/client/elm/View/Expand.elm +++ b/src/client/elm/LoggedIn/View/Expand.elm @@ -1,4 +1,4 @@ -module View.Expand +module LoggedIn.View.Expand ( expand , ExpandType(..) ) where diff --git a/src/client/elm/View/Price.elm b/src/client/elm/LoggedIn/View/Price.elm index be665a8..e8b4c58 100644 --- a/src/client/elm/View/Price.elm +++ b/src/client/elm/LoggedIn/View/Price.elm @@ -1,4 +1,4 @@ -module View.Price +module LoggedIn.View.Price ( price ) where diff --git a/src/client/elm/LoggedIn/View/Table.elm b/src/client/elm/LoggedIn/View/Table.elm index 7a156af..57167be 100644 --- a/src/client/elm/LoggedIn/View/Table.elm +++ b/src/client/elm/LoggedIn/View/Table.elm @@ -13,6 +13,8 @@ import Html.Events exposing (..) import LoggedIn.Action as LoggedInAction import LoggedIn.Model as LoggedInModel +import LoggedIn.View.Date exposing (..) +import LoggedIn.View.Price exposing (price) import Model exposing (Model) import Model.User exposing (getUserName) @@ -21,8 +23,6 @@ import Model.Translations exposing (getMessage) import Action exposing (..) import View.Icon exposing (renderIcon) -import View.Date exposing (..) -import View.Price exposing (price) paymentsTable : Address Action -> Model -> LoggedInModel.Model -> Html paymentsTable address model loggedInModel = |