From e23de5ea6cc04b1c94da26f82a4354c8973aefcc Mon Sep 17 00:00:00 2001 From: tobiasfaust <> Date: Wed, 20 Jul 2016 08:54:33 +0000 Subject: [PATCH] 93_DbLog.pm: DbLog_splitFn um Uebergabe DEVICE im Parameter 2 erweitert git-svn-id: https://svn.fhem.de/fhem/trunk@11823 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/93_DbLog.pm | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/fhem/FHEM/93_DbLog.pm b/fhem/FHEM/93_DbLog.pm index 4cc601bd9..47b0c9fc4 100644 --- a/fhem/FHEM/93_DbLog.pm +++ b/fhem/FHEM/93_DbLog.pm @@ -1,3 +1,4 @@ + ################################################################ # $Id$ # @@ -287,12 +288,15 @@ sub DbLog_ParseEvent($$$) my $unit; my $dtype = $defs{$device}{TYPE}; + + if($modules{$dtype}{DbLog_splitFn}) { # let the module do the job! - Log 4,"DbLog_ParseEvent calling external DbLog_splitFn for type: $dtype"; + + Log3 $device, 5, "DbLog_ParseEvent calling external DbLog_splitFn for type: $dtype , device: $device"; no strict "refs"; ($reading,$value,$unit) = - &{$modules{$dtype}{DbLog_splitFn}}($event); + &{$modules{$dtype}{DbLog_splitFn}}($event, $device); use strict "refs"; @result= ($reading,$value,$unit); return @result; @@ -645,7 +649,7 @@ sub DbLog_Log($$) { # Log is my entry, Dev is the entry of the changed device my ($hash, $dev) = @_; - Log3 $hash,5, "Notify from Device: ".$dev->{NAME}." recieved"; + Log3 $hash->{NAME}, 5, "Notify from Device: ".$dev->{NAME}." recieved"; return undef if($hash->{STATE} eq "disabled");