This commit is contained in:
2025-02-25 23:45:51 -08:00
parent d90f44c6c8
commit 70d03904f7

View File

@@ -1056,14 +1056,5 @@
@(upsert c))
#_(filter (comp #{"OTHER"} :type) (mapcat :tenders z))
#_(->> (apply get-square-clients [])
(s/->source)
(s/filter (fn [client]
(seq (filter :square-location/client-location (:client/square-locations client)))))
(s/map (fn [client]
(upsert client #clj-time/date-time "2025-02-12"
#clj-time/date-time "2025-02-")))
(s/buffer 5)
(s/realize-each)
(s/reduce conj []))
)