From 67d661ce5b876c5a3da929b809ccad96ecd559a4 Mon Sep 17 00:00:00 2001 From: Marko Oldenburg Date: Wed, 9 May 2018 08:04:42 +0200 Subject: [PATCH] fix uninitialized value --- 74_GardenaSmartDevice.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/74_GardenaSmartDevice.pm b/74_GardenaSmartDevice.pm index b66016f..c7c37ed 100644 --- a/74_GardenaSmartDevice.pm +++ b/74_GardenaSmartDevice.pm @@ -66,7 +66,7 @@ use Time::Local; eval "use JSON;1" or $missingModul .= "JSON "; -my $version = "1.0.1"; +my $version = "1.0.2"; @@ -190,7 +190,7 @@ sub GardenaSmartDevice_Set($@) { #my ($arg, @params) = @args; my $payload; - my $abilities; + my $abilities = ''; ### mower @@ -317,7 +317,7 @@ sub GardenaSmartDevice_WriteReadings($$) { do { - if( ref($decode_json->{abilities}[$abilities]{properties}) eq "ARRAY" and scalar(@{$decode_json->{abilities}[$abilities]{properties}}) > 0 ) {; + if( ref($decode_json->{abilities}[$abilities]{properties}) eq "ARRAY" and scalar(@{$decode_json->{abilities}[$abilities]{properties}}) > 0 ) { foreach my $propertie (@{$decode_json->{abilities}[$abilities]{properties}}) { readingsBulkUpdateIfChanged($hash,$decode_json->{abilities}[$abilities]{name}.'-'.$propertie->{name},GardenaSmartDevice_RigRadingsValue($hash,$propertie->{value})) if( defined($propertie->{value}) and $decode_json->{abilities}[$abilities]{name}.'-'.$propertie->{name} ne 'radio-quality' @@ -345,7 +345,7 @@ sub GardenaSmartDevice_WriteReadings($$) { do { - if( ref($decode_json->{settings}[$settings]{value}) eq "ARRAY" and $decode_json->{settings}[$settings]{name} eq 'starting_points' ) {; + if( ref($decode_json->{settings}[$settings]{value}) eq "ARRAY" and $decode_json->{settings}[$settings]{name} eq 'starting_points' ) { #save the startingpointid needed to update the startingpoints if ($hash->{helper}{STARTINGPOINTID} ne $decode_json->{settings}[$settings]{id}) { $hash->{helper}{STARTINGPOINTID} = $decode_json->{settings}[$settings]{id};