From ae6863f9a4980cead08b361c6c0cc15ae96b7cc2 Mon Sep 17 00:00:00 2001
From: martinp876 <martinp876@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Thu, 15 Oct 2020 13:32:29 +0000
Subject: [PATCH] 10_CUL_HM:bugfix trgPress command

git-svn-id: https://svn.fhem.de/fhem/trunk@22973 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/10_CUL_HM.pm | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/fhem/FHEM/10_CUL_HM.pm b/fhem/FHEM/10_CUL_HM.pm
index 7fd219ba0..dd352d352 100755
--- a/fhem/FHEM/10_CUL_HM.pm
+++ b/fhem/FHEM/10_CUL_HM.pm
@@ -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);
     }
     my @peers = ();
-    foreach my $peer (grep/$peer/,split",",InternalVal($name,"peerList","")){
-      if($defs{$peer}{helper}{role}{vrt}){
+    foreach my $peerItem (grep/$peer/,split",",InternalVal($name,"peerList","")){
+      if($defs{$peerItem}{helper}{role}{vrt}){
       }
-      elsif($defs{$peer}{helper}{role}{chn}){
-        push @peers,$peer;  
+      elsif($defs{$peerItem}{helper}{role}{chn}){
+        push @peers,$peerItem;  
       }
-      elsif($defs{$peer}{helper}{role}{dev}){
-        push @peers,CUL_HM_getAssChnNames($peer);  
+      elsif($defs{$peerItem}{helper}{role}{dev}){
+        push @peers,CUL_HM_getAssChnNames($peerItem);  
       }
     }
     my $peerCnt = 0;
     foreach my $peerSet(@peers){
       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]);}
       else                {CUL_HM_Set($defs{$peerSet},$peerSet,"press$type",$name);}
       $peerCnt++;