notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

be more friendly to square failures.

Browse Source
This commit is contained in:
Bryce Covert
2022-07-11 09:54:39 -07:00
parent 3adb1c74a8
commit 3e6a1e6eba
1 changed files with 8 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
src/clj/auto_ap/square/core.clj
View File

@@ -504,11 +504,16 @@
(catch [:status 401] data (catch [:status 401] data
(mark-integration-status client {:integration-status/state :integration-state/unauthorized (mark-integration-status client {:integration-status/state :integration-state/unauthorized
:integration-status/message (-> data :body )})) :integration-status/message (-> data :body str)}))
(catch Exception e
(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) (log/warn e)
(mark-integration-status client {:integration-status/state :integration-state/failed (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 (mount/defstate square-loader
:start (scheduler/every (* 4 59 60 1000) (heartbeat upsert-all "square-loading")) :start (scheduler/every (* 4 59 60 1000) (heartbeat upsert-all "square-loading"))