10_CUL_HM:bugfix trgPress command
git-svn-id: https://svn.fhem.de/fhem/trunk@22973 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -6349,20 +6349,20 @@ sub CUL_HM_Set($@) {#+++++++++++++++++ set command+++++++++++++++++++++++++++++
|
|||||||
return "condition $a[3] out of range. limit to 0..255" if ($a[3]<0 || $a[3]>255);
|
return "condition $a[3] out of range. limit to 0..255" if ($a[3]<0 || $a[3]>255);
|
||||||
}
|
}
|
||||||
my @peers = ();
|
my @peers = ();
|
||||||
foreach my $peer (grep/$peer/,split",",InternalVal($name,"peerList","")){
|
foreach my $peerItem (grep/$peer/,split",",InternalVal($name,"peerList","")){
|
||||||
if($defs{$peer}{helper}{role}{vrt}){
|
if($defs{$peerItem}{helper}{role}{vrt}){
|
||||||
}
|
}
|
||||||
elsif($defs{$peer}{helper}{role}{chn}){
|
elsif($defs{$peerItem}{helper}{role}{chn}){
|
||||||
push @peers,$peer;
|
push @peers,$peerItem;
|
||||||
}
|
}
|
||||||
elsif($defs{$peer}{helper}{role}{dev}){
|
elsif($defs{$peerItem}{helper}{role}{dev}){
|
||||||
push @peers,CUL_HM_getAssChnNames($peer);
|
push @peers,CUL_HM_getAssChnNames($peerItem);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
my $peerCnt = 0;
|
my $peerCnt = 0;
|
||||||
foreach my $peerSet(@peers){
|
foreach my $peerSet(@peers){
|
||||||
next if (!defined($peerSet) || !defined($defs{$peerSet}) );
|
next if (!defined($peerSet) || !defined($defs{$peerSet}) );
|
||||||
next if (!defined $defs{$peer}{helper}{cmds}{cmdLst}{press});
|
next if (!defined $defs{$peerSet}{helper}{cmds}{cmdLst}{press});
|
||||||
if($trig eq "Event"){CUL_HM_Set($defs{$peerSet},$peerSet,"event$type",$name,$a[3]);}
|
if($trig eq "Event"){CUL_HM_Set($defs{$peerSet},$peerSet,"event$type",$name,$a[3]);}
|
||||||
else {CUL_HM_Set($defs{$peerSet},$peerSet,"press$type",$name);}
|
else {CUL_HM_Set($defs{$peerSet},$peerSet,"press$type",$name);}
|
||||||
$peerCnt++;
|
$peerCnt++;
|
||||||
|
|||||||
Reference in New Issue
Block a user