diff --git a/fhem/FHEM/30_HUEBridge.pm b/fhem/FHEM/30_HUEBridge.pm index d31490ddd..9b14a83cf 100644 --- a/fhem/FHEM/30_HUEBridge.pm +++ b/fhem/FHEM/30_HUEBridge.pm @@ -1048,8 +1048,8 @@ HUEBridge_Get($@) my $ret = ""; foreach my $key ( sort {$a<=>$b} keys %{$result} ) { my $code = $name ."-". $key; - my $fhem_name = $modules{HUEDevice}{defptr}{$code}->{NAME} if( defined($modules{HUEDevice}{defptr}{$code}) ); - $fhem_name = "" if( !$fhem_name ); + my $fhem_name = ''; + $fhem_name = $modules{HUEDevice}{defptr}{$code}->{NAME} if( defined($modules{HUEDevice}{defptr}{$code}) ); $ret .= sprintf( "%2i %-25s %-15s %-25s", $key, $result->{$key}{name}, $fhem_name, $result->{$key}{type} ); $ret .= sprintf( "capabilities: %s", encode_json($result->{$key}{capabilities}) ) if( $arg && $arg eq 'detail' && defined($result->{$key}{capabilities}) ); $ret .= sprintf( "\n%2s %-25s %-15s %-25s config: %s", "", "", "", "", encode_json($result->{$key}{config}) ) if( $arg && $arg eq 'detail' && defined($result->{$key}{config}) ); @@ -1071,7 +1071,8 @@ HUEBridge_Get($@) my $ret = ""; foreach my $key ( sort {$a<=>$b} keys %{$result} ) { my $code = $name ."-G". $key; - my $fhem_name = $modules{HUEDevice}{defptr}{$code}->{NAME} if( defined($modules{HUEDevice}{defptr}{$code}) ); + my $fhem_name = ''; + $fhem_name = $modules{HUEDevice}{defptr}{$code}->{NAME} if( defined($modules{HUEDevice}{defptr}{$code}) ); $fhem_name = "" if( !$fhem_name ); $result->{$key}{type} = '' if( !defined($result->{$key}{type}) ); #deCONZ fix $result->{$key}{class} = '' if( !defined($result->{$key}{class}) ); #deCONZ fix @@ -1172,7 +1173,8 @@ HUEBridge_Get($@) my $ret = ""; foreach my $key ( sort {$a<=>$b} keys %{$result} ) { my $code = $name ."-S". $key; - my $fhem_name = $modules{HUEDevice}{defptr}{$code}->{NAME} if( defined($modules{HUEDevice}{defptr}{$code}) ); + my $fhem_name = ''; + $fhem_name = $modules{HUEDevice}{defptr}{$code}->{NAME} if( defined($modules{HUEDevice}{defptr}{$code}) ); $fhem_name = "" if( !$fhem_name ); $ret .= sprintf( "%2i: %-15s %-15s %-20s", $key, $result->{$key}{name}, $fhem_name, $result->{$key}{type} ); $ret .= sprintf( " %s", encode_json($result->{$key}{state}) ) if( $arg && $arg eq 'detail' );