mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Unit.pm: fix Use of uninitialized value

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@13198 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
loredo
2017-01-23 07:55:59 +00:00
parent 267f3ce9dd
commit 018d707c8c
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
fhem/FHEM/Unit.pm
View File

@@ -4274,9 +4274,11 @@ sub setKeyValAttr($$$$$) {
# write attribute # write attribute
$Data::Dumper::Terse = 1; $Data::Dumper::Terse = 1;
$Data::Dumper::Deepcopy = 1;
$Data::Dumper::Sortkeys = 1; $Data::Dumper::Sortkeys = 1;
my $txt = Dumper( $d->{$attribute} ); my $txt = Dumper( $d->{$attribute} );
$Data::Dumper::Terse = 0; $Data::Dumper::Terse = 0;
$Data::Dumper::Deepcopy = 0;
$Data::Dumper::Sortkeys = 0; $Data::Dumper::Sortkeys = 0;
$txt =~ s/(=>\s*\{|['"],?)\s*\n\s*/$1 /gsm; $txt =~ s/(=>\s*\{|['"],?)\s*\n\s*/$1 /gsm;
CommandAttr( undef, "$name $attribute $txt" ); CommandAttr( undef, "$name $attribute $txt" );
@@ -4372,7 +4374,7 @@ sub Unit_DbLog_split($$) {
$unit = defined($3) ? $3 : ""; $unit = defined($3) ? $3 : "";
} }
if ( !looks_like_number($value) ) { unless ( defined($value) && looks_like_number($value) ) {
Unit_Log3( $name, $reading, undef, 10, Unit_Log3( $name, $reading, undef, 10,
"Unit_DbLog_split $name: Ignoring event $event: value $value does not look like a number" "Unit_DbLog_split $name: Ignoring event $event: value $value does not look like a number"
); );