From 5f41bd1c1ec98bea8d7cc1760ff740ded20aa4d1 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Fri, 8 Mar 2024 09:26:24 +0100
Subject: backup-email: pass failure to packages-update

---
 backup-email.rsc | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/backup-email.rsc b/backup-email.rsc
index 9f6e31a..e4dec3b 100644
--- a/backup-email.rsc
+++ b/backup-email.rsc
@@ -22,6 +22,7 @@
   :global BackupSendGlobalConfig;
   :global Domain;
   :global Identity;
+  :global PackagesUpdateBackupFailure;
 
   :global CleanName;
   :global DeviceInfo;
@@ -46,6 +47,7 @@
   }
 
   :if ([ $ScriptLock $ScriptName ] = false) do={
+    :set PackagesUpdateBackupFailure true;
     :error false;
   }
   $WaitFullyConnected;
@@ -109,7 +111,9 @@
   :local I 0;
   :while ([ :len [ /file/find where name ~ ($FilePath . "\\.(backup|rsc)\$") ] ] > 0) do={
     :if ($I >= 120) do={
-      $LogPrintExit2 warning $ScriptName ("Files are still available, sending e-mail failed.") true;
+      $LogPrintExit2 warning $ScriptName ("Files are still available, sending e-mail failed.") false;
+      :set PackagesUpdateBackupFailure true;
+      :error false;
     }
     :delay 1s;
     :set I ($I + 1);
-- 
cgit v1.2.3-54-g00ecf