making sysco and mama lus work.

2020-04-11 09:26:59 -07:00
parent 6d10e4abb2
commit 19caf80bd8
6 changed files with 85 additions and 43 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 (str/split (.toLowerCase invoice-client-name) #"[\s:]" ))
        client-word-match (->> clients
                               (map
                                (fn [{:keys [:db/id :client/matches :client/name] :as client :or {matches []}}]