minor fix to clients
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user