other performance fix.
This commit is contained in:
@@ -372,7 +372,7 @@
|
|||||||
([client ]
|
([client ]
|
||||||
(doseq [square-location (:client/square-locations client)
|
(doseq [square-location (:client/square-locations client)
|
||||||
:when (:square-location/client-location square-location)]
|
:when (:square-location/client-location square-location)]
|
||||||
(upsert client square-location nil)))
|
(upsert client square-location (atime/unparse-local (time/now) atime/iso-date))))
|
||||||
([client location d]
|
([client location d]
|
||||||
(lc/with-context {:source "Square loading"}
|
(lc/with-context {:source "Square loading"}
|
||||||
(try
|
(try
|
||||||
|
|||||||
Reference in New Issue
Block a user