98_structure.pm: Fix FILTER problems introduced by last patch (Forum #47053)

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@10435 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2016-01-10 08:38:43 +00:00
parent 93f81a6a86
commit 8f3ab70a52

View File

@@ -363,13 +363,13 @@ structure_Set($@)
my $filter; my $filter;
if($list[1] ne "?") { if($list[1] ne "?") {
readingsSingleUpdate($hash, "state", @list[1..@list-1], 1); my $state = join(" ", @list[1..@list-1]);
readingsSingleUpdate($hash, "state", $state, 1);
if( $hash->{STATE} =~ /^\[(FILTER=.*)]/ ) { if($state =~ /^\[(FILTER=.*)]/) {
delete($hash->{INSET}); # Experimental, Forum #35382 delete($hash->{INSET}); # Experimental, Forum #35382
$filter = $1; $filter = $1;
@list = split(" ", @list = split(" ", $list[0] ." ". substr($state, length($filter)+2));
$list[0] ." ". substr($hash->{STATE}, length($filter)+2));
} }
} }