From 7cd1b689f7a7a1fd6cf023cc26b9024746ecd74e Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Tue, 3 Jan 2023 22:01:44 -0800 Subject: [PATCH] fix settlement loading --- src/clj/auto_ap/square/core2.clj | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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}))))))