From 06c0f7dfdcffa0ed448929b84bb09acd6e01c2be Mon Sep 17 00:00:00 2001 From: justme-1968 Date: Wed, 28 Aug 2013 12:29:20 +0000 Subject: [PATCH] small optimization git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@3815 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/33_readingsGroup.pm | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/FHEM/33_readingsGroup.pm b/FHEM/33_readingsGroup.pm index 4b872cf3f..63af9643c 100644 --- a/FHEM/33_readingsGroup.pm +++ b/FHEM/33_readingsGroup.pm @@ -360,6 +360,12 @@ readingsGroup_Notify($$) $value = $s; } + my $value_format = AttrVal( $name, "valueFormat", "" ); + if( $value_format =~ m/^{.*}$/ ) { + my $vf = eval $value_format; + $value_format = $vf if( $vf ); + } + foreach my $device (@{$devices}) { my $h = $defs{@{$device}[0]}; next if( !$h ); @@ -367,11 +373,6 @@ readingsGroup_Notify($$) my $regex = @{$device}[1]; next if( defined($regex) && $reading !~ m/^$regex$/); - my $value_format = AttrVal( $name, "valueFormat", "" ); - if( $value_format =~ m/^{.*}$/ ) { - my $vf = eval $value_format; - $value_format = $vf if( $vf ); - } if( $value_format ) { my $value_format = $value_format; if( ref($value_format) eq 'HASH' ) {