backup-email: pass failure to packages-update

This commit is contained in:
Christian Hesse 2024-03-08 09:26:24 +01:00
parent c82f776632
commit 5f41bd1c1e

View file

@ -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);