From 1e2b84b672fe960b81fe849d80bc15ebbccfb119 Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Tue, 21 Apr 2020 07:30:08 -0700 Subject: [PATCH] made location optional. --- src/clj/auto_ap/rule_matching.clj | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/clj/auto_ap/rule_matching.clj b/src/clj/auto_ap/rule_matching.clj index ef3353c1..91eaed6b 100644 --- a/src/clj/auto_ap/rule_matching.clj +++ b/src/clj/auto_ap/rule_matching.clj @@ -109,10 +109,10 @@ valid-locations) - [{:transaction-account/account (:db/id (:transaction-rule-account/account tra)) - :transaction-account/amount (Math/abs (* (:transaction-rule-account/percentage tra) - (:transaction/amount transaction))) - :transaction-account/location (:transaction-rule-account/location tra)}])) + [(cond-> {:transaction-account/account (:db/id (:transaction-rule-account/account tra)) + :transaction-account/amount (Math/abs (* (:transaction-rule-account/percentage tra) + (:transaction/amount transaction)))} + (:transaction-rule-account/location tra) (assoc :transaction-account/location (:transaction-rule-account/location tra)))])) (:transaction-rule/accounts rule))) accounts (mapv (fn [a]