10_MQTT2_DEVICE.pm: fix changing readingList with MATCHED (Forum #142401)

git-svn-id: https://svn.fhem.de/fhem/trunk@30252 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2025-09-04 10:56:30 +00:00
parent b87da5f801
commit 5091c927bb

View File

@@ -483,6 +483,7 @@ MQTT2_DEVICE_Attr($$)
if($atype eq "reading") { if($atype eq "reading") {
if($par2 =~ m/^{.*}\s*$/) { if($par2 =~ m/^{.*}\s*$/) {
my %v = ("%TOPIC"=>1, "%EVENT"=>"0 1 2 3 4 5 6 7 8 9", my %v = ("%TOPIC"=>1, "%EVENT"=>"0 1 2 3 4 5 6 7 8 9",
"%MATCHED" => [0,1,2,3,4,5,6,7,8,9],
"%NAME"=>$dev, "%CID"=>"clientId", "%JSONMAP"=>""); "%NAME"=>$dev, "%CID"=>"clientId", "%JSONMAP"=>"");
map { $v{"%$_"} = $hash->{".DT"}{$_} } keys %{$hash->{".DT"}}; map { $v{"%$_"} = $hash->{".DT"}{$_} } keys %{$hash->{".DT"}};
my $ret = perlSyntaxCheck($par2, %v); my $ret = perlSyntaxCheck($par2, %v);