global-functions: $FlushEmailQueue: delay if "in-progress"...

Something else is sending a mail... Let's wait and hope the status is
not confused.

1 files changed, 1 insertions, 0 deletions

diff --git a/global-functions b/global-functions
index 11c3bd7..f207ac8 100644
--- a/global-functions
+++ b/global-functions
@@ -354,6 +354,7 @@
   :foreach Id,Message in=$EmailQueue do={
     :if ([ :typeof $Message ] = "array" ) do={
       :local Attach [ $EitherOr ($Message->"attach") "" ];
+      :while ([ / tool e-mail get last-status ] = "in-progress") do={ :delay 1s; }
       / tool e-mail send to=($Message->"to") cc=($Message->"cc") subject=($Message->"subject") \
         body=($Message->"body") file=$Attach;
       :local Wait true;