From 0f0d63179a29f7005ad66e53a6c2be3e57a81162 Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Wed, 19 Jan 2022 17:21:35 -0800 Subject: [PATCH] fix. --- src/clj/auto_ap/routes/invoices.clj | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/src/clj/auto_ap/routes/invoices.clj b/src/clj/auto_ap/routes/invoices.clj index 67679fcb..45990005 100644 --- a/src/clj/auto_ap/routes/invoices.clj +++ b/src/clj/auto_ap/routes/invoices.clj @@ -129,9 +129,10 @@ (let [[matching-client similarity] (cond account-number (parse/best-match clients account-number 0.0) customer-identifier (parse/best-match clients customer-identifier) - client-override (first (filter (fn [c] - (= (:db/id c) (Long/parseLong client-override))) - clients))) + client-override [(first (filter (fn [c] + (= (:db/id c) (Long/parseLong client-override))) + clients)) + 1.0]) matching-vendor (match-vendor vendor-code vendor-override) matching-location (or (when-not (str/blank? location-override) location-override)