aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/LoggedIn/Update.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/elm/LoggedIn/Update.elm')
-rw-r--r--src/client/elm/LoggedIn/Update.elm14
1 files changed, 7 insertions, 7 deletions
diff --git a/src/client/elm/LoggedIn/Update.elm b/src/client/elm/LoggedIn/Update.elm
index 4598b27..8330310 100644
--- a/src/client/elm/LoggedIn/Update.elm
+++ b/src/client/elm/LoggedIn/Update.elm
@@ -23,8 +23,8 @@ import LoggedIn.Model as LoggedInModel
import LoggedIn.Home.Action as HomeAction
import LoggedIn.Home.Update as HomeUpdate
-import LoggedIn.User.Action as UserAction
-import LoggedIn.User.Update as UserUpdate
+import LoggedIn.Income.Action as IncomeAction
+import LoggedIn.Income.Update as IncomeUpdate
import LoggedIn.Home.AddPayment.Action as AddPaymentAction
import LoggedIn.Home.AddPayment.Update as AddPaymentUpdate
@@ -47,11 +47,11 @@ update model action loggedIn =
, Effects.map LoggedInAction.HomeAction effects
)
- LoggedInAction.UserAction userAction ->
- case UserUpdate.update loggedData userAction loggedIn.user of
- (user, effects) ->
- ( { loggedIn | user = user }
- , Effects.map LoggedInAction.UserAction effects
+ LoggedInAction.IncomeAction incomeAction ->
+ case IncomeUpdate.update loggedData incomeAction loggedIn.income of
+ (income, effects) ->
+ ( { loggedIn | income = income }
+ , Effects.map LoggedInAction.IncomeAction effects
)
LoggedInAction.AddPayment name cost frequency ->