FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-04 05:16:45 +00:00
Code Issues Releases Wiki Activity

33_readingsGroup.pm: fixed devspec :FILER=, see forum http://forum.fhem.de/index.php/topic,31792.msg305388.html#msg305388

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@8782 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
justme-1968 2015-06-20 08:47:03 +00:00
parent a7782eee91
commit 71868f02fe
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
fhem/FHEM/33_readingsGroup.pm
View File

@ -94,15 +94,16 @@ readingsGroup_updateDevices($;$)
$hash->{DEF} =~ s/\s*[{].*$//g;
last;
} else {
my @device = split(":", $param, 2);
my @device = split(":", $param, 2); # 2 -> to allow : in calc expressions
if( $device[1] && $device[1] =~ m/^FILTER=/ ) {
my @device = split(":", $param); # split all to get multiple FILTER but exclude the : before the readings
my $devspec = shift(@device);
while( @device && $device[0] =~ m/^FILTER=/ ) {
$devspec .= ":";
$devspec .= shift(@device)
$devspec .= shift(@device);
}
my $regex = $device[0];
my $regex = join(':', @device); # merge the rest back again
foreach my $d (devspec2array($devspec)) {
$list{$d} = 1;
push @devices, [$d,$regex];