From 2df83862a1c8c4d81489fbdd5fd0dff00d2ffef3 Mon Sep 17 00:00:00 2001 From: betateilchen <> Date: Mon, 10 Mar 2014 18:20:18 +0000 Subject: [PATCH] 70_WS3600.pm - fixed: annoying warnings in Loglevel 4 and 5 described in http://forum.fhem.de/index.php/topic,20859.0.html git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@5189 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/70_WS3600.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/FHEM/70_WS3600.pm b/FHEM/70_WS3600.pm index d3660e02e..5f5848ee0 100644 --- a/FHEM/70_WS3600.pm +++ b/FHEM/70_WS3600.pm @@ -269,7 +269,10 @@ WS3600_Read($) $inputline =~ s/\s+$//; my ($rawreading, $val, $val2) = split(/ /, $inputline); if(defined($rawreading)) { - Log3 $name, 4, "WS3600(Dbg): $name read $inputline|$rawreading|$val|$val2"; + my $logmsg = "WS3600(Dbg): $name read $inputline|$rawreading|$val"; + $logmsg .= "|$val2" if(defined($val2)); + Log3 $name, 4, $logmsg; +# Log3 $name, 4, "WS3600(Dbg): $name read $inputline|$rawreading|$val|$val2"; if(defined($TranslatedCodes{$rawreading})) { $reading = $TranslatedCodes{$rawreading}; readingsBulkUpdate($hash,$reading, $val);