minor fix to clients

This commit is contained in:
Bryce Covert
2020-05-20 06:49:39 -07:00
parent a7a3966f1b
commit 8b07824a8c

View File

@@ -167,13 +167,13 @@
::bank-account-activated
[(forms/in-form ::new-client) (re-frame/path [:data :bank-accounts])]
(fn [bank-accounts [_ index]]
(update bank-accounts index assoc :active? true)))
(update (vec (sort-by :sort-order bank-accounts)) index assoc :active? true)))
(re-frame/reg-event-db
::bank-account-deactivated
[(forms/in-form ::new-client) (re-frame/path [:data :bank-accounts])]
(fn [bank-accounts [_ index]]
(update bank-accounts index assoc :active? false)))
(update (vec (sort-by :sort-order bank-accounts)) index assoc :active? false)))
(re-frame/reg-event-db
::bank-account-removed