diff options
| author | Joris | 2017-03-26 22:56:41 +0200 |
|---|---|---|
| committer | Joris | 2017-03-26 22:56:41 +0200 |
| commit | 8062f1c9c34e9b25d76b22bd6ba2a1a99666279b (patch) | |
| tree | 2179d31ece8d92864196b38b42ed3a4d01b2f186 /src/client/LoggedIn | |
| parent | 778040bf9f3f60ec50b1b437f93ab123854917f2 (diff) | |
| download | budget-8062f1c9c34e9b25d76b22bd6ba2a1a99666279b.tar.gz budget-8062f1c9c34e9b25d76b22bd6ba2a1a99666279b.tar.bz2 budget-8062f1c9c34e9b25d76b22bd6ba2a1a99666279b.zip | |
Fix update payment category constraint error
Diffstat (limited to 'src/client/LoggedIn')
| -rw-r--r-- | src/client/LoggedIn/Update.elm | 4 |
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 } |