From bab95cddcd8cc941492953e66eb21cd37b26402a Mon Sep 17 00:00:00 2001
From: markusbloch <markusbloch@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sun, 7 Jan 2018 11:09:26 +0000
Subject: [PATCH] FB_CALLLIST: fix warnings during startup if no mapping is
 used

git-svn-id: https://svn.fhem.de/fhem/trunk@15810 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/72_FB_CALLLIST.pm | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/fhem/FHEM/72_FB_CALLLIST.pm b/fhem/FHEM/72_FB_CALLLIST.pm
index ef364105f..346313b27 100755
--- a/fhem/FHEM/72_FB_CALLLIST.pm
+++ b/fhem/FHEM/72_FB_CALLLIST.pm
@@ -309,7 +309,7 @@ sub FB_CALLLIST_Notify($$)
 
         if(grep(m/^(?:ATTR $name external-mapping .*|INITIALIZED|REREADCFG)$/, @{$events}))
         {
-            my $value = AttrVal($name,"external-mapping",undef);
+            my $value = AttrVal($name,"external-mapping","");
             my $table = eval($value);
 
             if($table and ref($table) eq 'HASH')
@@ -321,7 +321,7 @@ sub FB_CALLLIST_Notify($$)
 
         if(grep(m/^(?:ATTR $name connection-mapping .*|INITIALIZED|REREADCFG)$/, @{$events}))
         {
-            my $value = AttrVal($name,"connection-mapping",undef);
+            my $value = AttrVal($name,"connection-mapping","");
             my $table = eval($value);
 
             if($table and ref($table) eq 'HASH')
@@ -333,9 +333,9 @@ sub FB_CALLLIST_Notify($$)
 
         if(grep(m/^(?:ATTR $name icon-mapping .*|INITIALIZED|REREADCFG)$/, @{$events}))
         {
-            my $value = AttrVal($name,"icon-mapping",undef);
-
-            $value =~ s/"([^"]+?)"/'$1'/g if(defined($value)); # workaround for array variable interpretation
+            my $value = AttrVal($name,"icon-mapping","");
+            
+            $value =~ s/"([^"]+?)"/'$1'/g; # workaround for array variable interpretation
 
             my $table = eval($value);