Now overrides actually make an impact

This commit is contained in:
Bryce Covert
2020-04-19 17:02:05 -07:00
parent a48ee8dd52
commit 47babdfe7c
10 changed files with 62 additions and 36 deletions

View File

@@ -160,10 +160,9 @@
(fn [data field value]
(cond (and (= [:vendor] field)
value
(doto (expense-accounts-field/can-replace-with-default? (:accounts data))
println))
(expense-accounts-field/can-replace-with-default? (:accounts data)))
[[:accounts] (expense-accounts-field/default-account (:accounts data)
@(re-frame/subscribe [::subs/vendor-default-account value])
@(re-frame/subscribe [::subs/vendor-default-account value (:client data)])
(:total data)
[])]

View File

@@ -91,7 +91,8 @@
(re-frame/reg-event-db
::errored
(fn [db [_ error]]
(assoc db ::error (:message (edn/read-string error)))))
(assoc db ::error (or (:message (edn/read-string error))
"An unknown error has occured."))))
(re-frame/reg-event-fx
::reject-invoices-clicked

View File

@@ -142,7 +142,7 @@
value
(expense-accounts-field/can-replace-with-default? (:expense-accounts data)))
[[:expense-accounts] (expense-accounts-field/default-account (:expense-accounts data)
@(re-frame/subscribe [::subs/vendor-default-account value])
@(re-frame/subscribe [::subs/vendor-default-account value (:client data)])
(:total data)
locations)]

View File

@@ -69,7 +69,7 @@
value
(expense-accounts-field/can-replace-with-default? (:accounts data)))
[[:accounts] (expense-accounts-field/default-account (:accounts data)
@(re-frame/subscribe [::subs/vendor-default-account value])
@(re-frame/subscribe [::subs/vendor-default-account value (:client data)])
(:amount data)
locations)]
[])))))