fix empty arg array condition

This commit is contained in:
Sebastian 2021-07-13 17:22:03 +02:00
parent 4e52ea8215
commit a856bb574a
2 changed files with 2 additions and 2 deletions

View File

@ -407,7 +407,7 @@ sub Set {
}
elsif ( lc $cmd eq 'on' || lc $cmd eq 'off' || lc $cmd eq 'on-for-timer' ) {
my $val = (
defined($aArg) && ref($aArg) eq 'ARRAY'
scalar(!@$aArg == 0) && ref($aArg) eq 'ARRAY'
? $aArg->[0] * 60
: lc $cmd
);

View File

@ -1,2 +1,2 @@
UPD 2021-06-28_15:56:58 47009 FHEM/73_GardenaSmartBridge.pm
UPD 2021-07-12_11:56:06 56210 FHEM/74_GardenaSmartDevice.pm
UPD 2021-07-13_17:21:48 56216 FHEM/74_GardenaSmartDevice.pm