removes retry-4 which may obfuscate the error we're encountering

src/clj/auto_ap/square/core3.clj

@@ -441,8 +441,7 @@
                           {:url (str "https://connect.squareup.com/v1/" (:square-location/square-id location) "/settlements/" settlement-id)
                            :method :get
                            :headers       (client-base-headers client)
-                           :as            :json
-                           :retry-handler retry-4})
+                           :as            :json})
                          :body))))
              (s/buffer 10)
              (s/realize-each)
@@ -506,8 +505,7 @@
                                  :method :get
 
                                  :headers       (client-base-headers client)
-                                 :as            :json
-                                 :retry-handler retry-4})
+                                 :as            :json})
              :body
              :refunds
              (fn [refunds]