FHEM/mod-GardenaSmart
1
0
Fork 0
Code Issues 2 Pull Requests Releases 3 Wiki Activity

fix Cant use string (enable) as an ARRAY ref while strict refs in use bug

Browse Source
This commit is contained in:
Marko Oldenburg
2020-05-01 21:37:14 +02:00
parent 0fc3d1dfba
commit 64c192d3b2
1 changed files with 4 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
74_GardenaSmartDevice.pm
View File

@ -298,8 +298,7 @@ sub Set {
elsif ( lc $cmd eq 'startpoint' ) { elsif ( lc $cmd eq 'startpoint' ) {
my $err; my $err;
print Dumper $aArg; ( $err, $payload, $abilities ) = SetPredefinedStartPoints( $hash, $aArg );
# ( $err, $payload, $abilities ) = SetPredefinedStartPoints( $hash, @$aArg );
return $err if ( defined($err) ); return $err if ( defined($err) );
} }
@ -834,13 +833,10 @@ sub Zulu2LocalString {
} }
sub SetPredefinedStartPoints { sub SetPredefinedStartPoints {
my $hash = shift; my $hash = shift;
my $aArg = shift; my $aArg = shift;
my $startpoint_state = shift @$aArg; my ($startpoint_state,$startpoint_num,@morestartpoints) = @{$aArg};
my $startpoint_num = shift @$aArg;
my @morestartpoints = @{$aArg};
my $name = $hash->{NAME}; my $name = $hash->{NAME};
my $payload; my $payload;