notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

fixes sysco import.

Browse Source
This commit is contained in:
Bryce
2023-05-30 13:52:08 -07:00
parent 534b6e35f2
commit 1444a661d8
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/clj/auto_ap/jobs/sysco.clj
View File

@@ -87,7 +87,7 @@
[{:client/location-matches [:location-match/location :location-match/matches]} [{:client/location-matches [:location-match/location :location-match/matches]}
:client/default-location :client/default-location
:client/locations] :client/locations]
matching-client) (:db/id matching-client))
location-hint location-hint
location-hint ) location-hint )
:date (coerce/to-date date) :date (coerce/to-date date)

2
src/clj/auto_ap/parse.clj
View File

@@ -124,7 +124,7 @@
(defn exact-match (defn exact-match
([clients invoice-client-name] ([clients invoice-client-name]
(->> clients (->> clients
(filter (fn [{:keys [:client/matches :client/name] :as client :or {matches []}}] (filter (fn [{:keys [:client/matches :client/location-matches :client/locations :client/name] :as client :or {matches []}}]
(seq (seq
(filter (fn [m] (filter (fn [m]
(and (and