From 68fcc2673b084a81e74149703d251bfb2712883b Mon Sep 17 00:00:00 2001 From: rudolfkoenig <> Date: Tue, 27 Aug 2019 07:47:27 +0000 Subject: [PATCH] fhem.pl: check 2-times .associatedWith in getPawList (Forum #103095) git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@20068 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem.pl | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/fhem.pl b/fhem.pl index a89730112..598cf0c24 100755 --- a/fhem.pl +++ b/fhem.pl @@ -5731,11 +5731,14 @@ getPawList($) my ($d) = @_; my $h = $defs{$d}; my @dob; + my $daw = ReadingsVal($d, ".associatedWith", ""); # 103095 foreach my $dn (sort keys %defs) { next if(!$dn || $dn eq $d); my $dh = $defs{$dn}; if(($dh->{DEF} && $dh->{DEF} =~ m/\b$d\b/) || - ($h->{DEF} && $h->{DEF} =~ m/\b$dn\b/)) { + (ReadingsVal($dn, ".associatedWith", "") =~ m/\b$d\b/) || + ($h->{DEF} && $h->{DEF} =~ m/\b$dn\b/) || + $daw =~ m/\b$dn\b/) { push(@dob, $dn); } }