fix.
This commit is contained in:
@@ -129,9 +129,10 @@
|
|||||||
(let [[matching-client similarity] (cond
|
(let [[matching-client similarity] (cond
|
||||||
account-number (parse/best-match clients account-number 0.0)
|
account-number (parse/best-match clients account-number 0.0)
|
||||||
customer-identifier (parse/best-match clients customer-identifier)
|
customer-identifier (parse/best-match clients customer-identifier)
|
||||||
client-override (first (filter (fn [c]
|
client-override [(first (filter (fn [c]
|
||||||
(= (:db/id c) (Long/parseLong client-override)))
|
(= (:db/id c) (Long/parseLong client-override)))
|
||||||
clients)))
|
clients))
|
||||||
|
1.0])
|
||||||
matching-vendor (match-vendor vendor-code vendor-override)
|
matching-vendor (match-vendor vendor-code vendor-override)
|
||||||
matching-location (or (when-not (str/blank? location-override)
|
matching-location (or (when-not (str/blank? location-override)
|
||||||
location-override)
|
location-override)
|
||||||
|
|||||||
Reference in New Issue
Block a user