diff options
author | Joris | 2016-03-27 20:41:59 +0200 |
---|---|---|
committer | Joris | 2016-03-27 20:41:59 +0200 |
commit | 7c050fe2d2c3e8f190e019e1613d37b9d8ef22b9 (patch) | |
tree | 1465f7367335492cd246b67ab9a02968517d57a5 /src/client/elm/LoggedIn/Update.elm | |
parent | 702d60cbcdf85216a1b18416f4480afb77384e8a (diff) |
Regroup account modules
Diffstat (limited to 'src/client/elm/LoggedIn/Update.elm')
-rw-r--r-- | src/client/elm/LoggedIn/Update.elm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/client/elm/LoggedIn/Update.elm b/src/client/elm/LoggedIn/Update.elm index aac046d..e017423 100644 --- a/src/client/elm/LoggedIn/Update.elm +++ b/src/client/elm/LoggedIn/Update.elm @@ -16,10 +16,12 @@ import Server import LoggedIn.Action as LoggedInAction import LoggedIn.Model as LoggedInModel +import LoggedIn.Account.Action as AccountAction +import LoggedIn.Account.Update as AccountUpdate + import Model exposing (Model) import Model.User exposing (UserId) import Model.Payment exposing (..) -import Model.Action.AccountAction as Account import Model.Action.MonthlyAction as Monthly import Model.Action.AddPaymentAction as AddPayment import Model.View.LoggedIn.AddPayment exposing (..) @@ -27,7 +29,6 @@ import Model.Translations exposing (Translations, getMessage) import Update.LoggedIn.AddPayment exposing (updateAddPayment, addPaymentError) import Update.LoggedIn.Monthly exposing (updateMonthly) -import Update.LoggedIn.Account exposing (updateAccount) update : Model -> LoggedInAction.Action -> LoggedInModel.Model -> (LoggedInModel.Model, Effects LoggedInAction.Action) update model action loggedInView = @@ -130,7 +131,7 @@ update model action loggedInView = ) LoggedInAction.UpdateAccount accountAction -> - let (newAccount, accountEffects) = updateAccount accountAction loggedInView.account + let (newAccount, accountEffects) = AccountUpdate.update accountAction loggedInView.account in ( { loggedInView | account = newAccount } , Effects.map LoggedInAction.UpdateAccount accountEffects ) |