From 04fa5466799c466f0c3f6c7e3546979cb65835cd Mon Sep 17 00:00:00 2001
From: Christophe Croullebois <christophe.croullebois@biblibre.com>
Date: Wed, 10 Nov 2021 16:23:54 +0100
Subject: [PATCH] Bug 29452: remove unnecessary warns in the logs

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
(cherry picked from commit 8c8c7d77cfb220a7317739a4d84af48a466e569b)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
(cherry picked from commit af3dd5945fde6613d42e0dc0ed94f616f865ca3c)
Signed-off-by: Victor Grousset/tuxayo <victor@tuxayo.net>
---
 C4/SIP/Sip.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C4/SIP/Sip.pm b/C4/SIP/Sip.pm
index 3d68f9765c..d1611aceb4 100644
--- a/C4/SIP/Sip.pm
+++ b/C4/SIP/Sip.pm
@@ -99,7 +99,7 @@ sub maybe_add {
         return q{} if first { $_ eq $fid } @fields;
     }
 
-    if ( $fid eq FID_SCREEN_MSG && $server->{account}->{screen_msg_regex} ) {
+    if ( $fid eq FID_SCREEN_MSG && $server->{account}->{screen_msg_regex} && defined($value)) {
         foreach my $regex (
             ref $server->{account}->{screen_msg_regex} eq "ARRAY"
             ? @{ $server->{account}->{screen_msg_regex} }
-- 
2.39.5