diff --git a/src/clj/auto_ap/square/core2.clj b/src/clj/auto_ap/square/core2.clj index 34f1f15e..9dd04325 100644 --- a/src/clj/auto_ap/square/core2.clj +++ b/src/clj/auto_ap/square/core2.clj @@ -290,7 +290,7 @@ (map (fn [s] (lc/with-context {:source "Square settlements loading "} (log/info "Looking up settlement " s " for location " (:square-location/client-location location)) - (:body (retry #(client/get (str "https://connect.squareup.com/v1/" (:square-location/square-id location) "/settlements/" s) + (:body (retry #(client/get (str "https://connect.squareup.com/v1/" (:square-location/square-id location) "/settlements/" (:id s)) {:headers (client-base-headers client) :as :json :retry-handler retry-4}))))))