From baa096fe03440725f8b72912daa3df7c30a6dbc0 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Mon, 15 Mar 2021 00:48:38 +0100
Subject: log-forward: filter e-mail error on log forwarding in script...

... and update the filter in global configuration.
---
 log-forward | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'log-forward')

diff --git a/log-forward b/log-forward
index 4332c2a..2866e2f 100644
--- a/log-forward
+++ b/log-forward
@@ -17,8 +17,10 @@
 :global LogForwardRateLimit;
 :global NotificationsWithSymbols;
 
+:global CharacterReplace;
 :global IfThenElse;
 :global LogPrintExit2;
+:global QuotedPrintable;
 :global ScriptLock;
 :global SendNotification;
 :global SymbolForNotification;
@@ -43,7 +45,11 @@ $WaitFullyConnected;
 :local MessageVal;
 :local MessageDups [ :toarray "" ];
 
-:foreach Message in=[ / log find where !(topics~$LogForwardFilter) !(message~$LogForwardFilterMessage) ] do={
+:local LogForwardFilterLogForwarding [ $CharacterReplace ("^Error sending e-mail <" . \
+    [ $QuotedPrintable ("\\[" . $Identity . "\\] " . [ $SymbolForNotification "warning-sign" ] . \
+    "Log Forwarding") ] . ">:") ("\?") ("\\\?") ];
+:foreach Message in=[ / log find where !(topics~$LogForwardFilter) !(message="") \
+    !(message~$LogForwardFilterLogForwarding) !(message~$LogForwardFilterMessage) ] do={
   :set MessageVal [ / log get $Message ];
 
   :if ($LogForwardLast = ($MessageVal->".id")) do={
-- 
cgit v1.2.3-54-g00ecf