del monte meat co

2020-04-17 21:09:30 -07:00
parent cd5dd2d1fe
commit 655cfe7067
2 changed files with 12 additions and 1 deletions
--- a/src/clj/auto_ap/parse.clj
+++ b/src/clj/auto_ap/parse.clj
@@ -91,7 +91,7 @@
                         (sort-by second)
                         ffirst)

-        word-set (set (str/split (.toLowerCase invoice-client-name) #"[\s:]" ))
+        word-set (set (filter (complement str/blank?) (str/split (.toLowerCase invoice-client-name) #"[\s:\-]" )))
        client-word-match (->> clients
                               (map
                                (fn [{:keys [:db/id :client/matches :client/name] :as client :or {matches []}}]