made location optional.

This commit is contained in:
Bryce Covert
2020-04-21 07:30:08 -07:00
parent 9cb42be9e8
commit 1e2b84b672

View File

@@ -109,10 +109,10 @@
valid-locations) valid-locations)
[{:transaction-account/account (:db/id (:transaction-rule-account/account tra)) [(cond-> {:transaction-account/account (:db/id (:transaction-rule-account/account tra))
:transaction-account/amount (Math/abs (* (:transaction-rule-account/percentage tra) :transaction-account/amount (Math/abs (* (:transaction-rule-account/percentage tra)
(:transaction/amount transaction))) (:transaction/amount transaction)))}
:transaction-account/location (:transaction-rule-account/location tra)}])) (:transaction-rule-account/location tra) (assoc :transaction-account/location (:transaction-rule-account/location tra)))]))
(:transaction-rule/accounts rule))) (:transaction-rule/accounts rule)))
accounts (mapv accounts (mapv
(fn [a] (fn [a]