33_readingsGroup.pm: fixed warning for undef value in val2nu
git-svn-id: https://svn.fhem.de/fhem/trunk@8780 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -255,7 +255,7 @@ rgVal2Num($)
|
||||
{
|
||||
my ($num) = @_;
|
||||
|
||||
$num =~ s/[^-\.\d]//g;
|
||||
$num =~ s/[^-\.\d]//g if( defined($num) );
|
||||
|
||||
return $num;
|
||||
}
|
||||
@@ -271,7 +271,7 @@ lookup($$$$$$$$$)
|
||||
my $READING = $reading;
|
||||
my $VALUE = $value;
|
||||
my $NUM = $VALUE;
|
||||
$NUM =~ s/[^-\.\d]//g;
|
||||
$NUM =~ s/[^-\.\d]//g if( defined($NUM) );
|
||||
my $ROW = $row;
|
||||
my $m = eval $mapping;
|
||||
if( $@ ) {
|
||||
@@ -333,7 +333,7 @@ lookup2($$$$;$$)
|
||||
my $READING = $reading;
|
||||
my $VALUE = $value;
|
||||
my $NUM = $VALUE;
|
||||
$NUM =~ s/[^-\.\d]//g;
|
||||
$NUM =~ s/[^-\.\d]//g if( defined($NUM) );
|
||||
my $ROW = $row;
|
||||
my $COLUMN = $column;
|
||||
my $l = eval $lookup;
|
||||
|
||||
Reference in New Issue
Block a user