be more friendly to square failures.

This commit is contained in:
2022-07-11 09:54:39 -07:00
parent 3adb1c74a8
commit 3e6a1e6eba

View File

@@ -504,11 +504,16 @@
(catch [:status 401] data
(mark-integration-status client {:integration-status/state :integration-state/unauthorized
:integration-status/message (-> data :body )}))
(catch Exception e
:integration-status/message (-> data :body str)}))
(catch [:status 503] data
(mark-integration-status client {:integration-status/state :integration-state/failed
:integration-status/message (-> data :body str)}))
(catch Object e
(log/warn e)
(mark-integration-status client {:integration-status/state :integration-state/failed
:integration-status/message (.getMessage e)}))))))
:integration-status/message (.getMessage (:wrapper &throw-context))}))))))
(mount/defstate square-loader
:start (scheduler/every (* 4 59 60 1000) (heartbeat upsert-all "square-loading"))