aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--global-functions4
1 files changed, 3 insertions, 1 deletions
diff --git a/global-functions b/global-functions
index ff16076..d048748 100644
--- a/global-functions
+++ b/global-functions
@@ -339,7 +339,7 @@
$LogPrintExit2 warning $0 ("Flushing E-Mail messages from scheduler, but queue is empty.") false;
}
- / system scheduler set interval=1m [ find where name="FlushEmailQueue" interval=1s ];
+ / system scheduler set interval=($QueueLen . "m") [ find where name="FlushEmailQueue" ];
:foreach Id,Message in=$EmailQueue do={
:if ([ :typeof $Message ] = "array" ) do={
@@ -364,6 +364,8 @@
:if ($AllDone = true && $QueueLen = [ :len $EmailQueue ]) do={
/ system scheduler remove [ find where name="FlushEmailQueue" ];
:set EmailQueue;
+ } else={
+ / system scheduler set interval=1m [ find where name="FlushEmailQueue" ];
}
}