00_MQTT2_CLIENT.pm: fix ignoreRegexp (Forum #117058)

git-svn-id: https://svn.fhem.de/fhem/trunk@23419 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2020-12-26 13:03:55 +00:00
parent 349946841a
commit 157d11f75e

View File

@ -466,8 +466,7 @@ MQTT2_CLIENT_Read($@)
$val = "" if(!defined($val)); $val = "" if(!defined($val));
my $ir = AttrVal($name, "ignoreRegexp", undef); my $ir = AttrVal($name, "ignoreRegexp", undef);
next if(defined($ir) && "$tp:$val" =~ m/$ir/); if(!defined($ir) || "$tp:$val" !~ m/$ir/) {
my $ac = AttrVal($name, "autocreate", "no"); my $ac = AttrVal($name, "autocreate", "no");
$ac = $ac eq "1" ? "simple" : ($ac eq "0" ? "no" : $ac); # backward comp. $ac = $ac eq "1" ? "simple" : ($ac eq "0" ? "no" : $ac); # backward comp.
@ -478,6 +477,7 @@ MQTT2_CLIENT_Read($@)
my $re = AttrVal($name, "rawEvents", undef); my $re = AttrVal($name, "rawEvents", undef);
DoTrigger($name, "$tp:$val") if($re && $tp =~ m/$re/); DoTrigger($name, "$tp:$val") if($re && $tp =~ m/$re/);
} }
}
} else { } else {
Log 1, "M2: Unhandled packet $cpt, disconneting $name"; Log 1, "M2: Unhandled packet $cpt, disconneting $name";