Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-01 20:20:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

fhem.pl: check 2-times .associatedWith in getPawList (Forum #103095)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@20068 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2019-08-27 07:47:27 +00:00
parent 63237993bf
commit 68fcc2673b
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
fhem.pl
View File

@ -5731,11 +5731,14 @@ getPawList($)
my ($d) = @_; my ($d) = @_;
my $h = $defs{$d}; my $h = $defs{$d};
my @dob; my @dob;
my $daw = ReadingsVal($d, ".associatedWith", ""); # 103095
foreach my $dn (sort keys %defs) { foreach my $dn (sort keys %defs) {
next if(!$dn || $dn eq $d); next if(!$dn || $dn eq $d);
my $dh = $defs{$dn}; my $dh = $defs{$dn};
if(($dh->{DEF} && $dh->{DEF} =~ m/\b$d\b/) || 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); push(@dob, $dn);
} }
} }