From 9e96ce49448217bfb72b0e6a5ea11aed24b44e27 Mon Sep 17 00:00:00 2001
From: Bryce Covert <bryce@brycecovertoperations.com>
Date: Tue, 28 Mar 2023 13:38:32 -0700
Subject: [PATCH] More safety checks

---
 src/clj/auto_ap/backup.clj | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/src/clj/auto_ap/backup.clj b/src/clj/auto_ap/backup.clj
index b86e616b..84371270 100644
--- a/src/clj/auto_ap/backup.clj
+++ b/src/clj/auto_ap/backup.clj
@@ -505,4 +505,13 @@
            (mu/log ::copied)))))))
 
 (defn -main [& _]
-  (execute "export-backup" #(dump-all)))
+  (try 
+    (execute "export-backup" #(dump-all))
+    (catch Exception e
+      (println e)
+      (mu/log ::quit-error
+              :exception e
+              :background-job "export-backup"
+              :service "export-backup")
+      (Thread/sleep 5000)
+      (throw e))))