aboutsummaryrefslogtreecommitdiff
path: root/src/client/LoggedIn/Update.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/LoggedIn/Update.elm')
-rw-r--r--src/client/LoggedIn/Update.elm4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/client/LoggedIn/Update.elm b/src/client/LoggedIn/Update.elm
index 9e6d6ee..f5ce7ea 100644
--- a/src/client/LoggedIn/Update.elm
+++ b/src/client/LoggedIn/Update.elm
@@ -74,7 +74,7 @@ update model msg loggedIn =
let newPayment = Payment paymentId name cost date loggedIn.me frequency
in ( { loggedIn
| payments = newPayment :: loggedIn.payments
- , paymentCategories = PaymentCategory.set name category loggedIn.paymentCategories
+ , paymentCategories = PaymentCategory.save name category loggedIn.paymentCategories
}
, Cmd.none
)
@@ -88,7 +88,7 @@ update model msg loggedIn =
, paymentCategories =
case mbOldPayment of
Just oldPayment ->
- PaymentCategory.update oldPayment.name name category loggedIn.paymentCategories
+ PaymentCategory.save name category loggedIn.paymentCategories
Nothing ->
loggedData.paymentCategories
}