fix undefined value as an ARRAY reference bug

This commit is contained in:
Marko Oldenburg 2019-06-15 08:50:19 +02:00
parent d75eba21c7
commit c687b12a92

View File

@ -59,7 +59,7 @@ use strict;
use warnings; use warnings;
use FHEM::Meta; use FHEM::Meta;
my $version = '1.6.5'; my $version = '1.6.5.3';
sub GardenaSmartBridge_Initialize($) { sub GardenaSmartBridge_Initialize($) {
@ -753,7 +753,8 @@ sub WriteReadings($$) {
scalar( @{ $decode_json->{zones} } ) ); scalar( @{ $decode_json->{zones} } ) );
} }
elsif ( $decode_json->{id} ne $hash->{helper}{locations_id} elsif ( $decode_json->{id} ne $hash->{helper}{locations_id}
and ref( $decode_json->{abilities} ) eq 'ARRAY' ) and ref($decode_json->{abilities}) eq 'ARRAY'
and ref($decode_json->{abilities}[0]{properties}) eq 'ARRAY' )
{ {
my $properties = my $properties =
scalar( @{ $decode_json->{abilities}[0]{properties} } ); scalar( @{ $decode_json->{abilities}[0]{properties} } );