fixes historical load

This commit is contained in:
2023-10-18 23:49:04 -07:00
parent bd9476544c
commit 6059e8a4ca

View File

@@ -51,7 +51,8 @@
(log/info "loading new approach")
(let [client (dc/pull (dc/db auto-ap.datomic/conn)
square/square-read
client)]
client)
days (Long/parseLong days)]
(doseq [square-location (:client/square-locations client)
:when (:square-location/client-location square-location)]