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

98_freezemon.pm: removed unnecessary blockingCall, bugfixes & removed some Debugging Info

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@16411 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
KernSani
2018-03-14 22:22:14 +00:00
parent 6abe88d0f4
commit 0f58e01b1a
1 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
fhem/FHEM/98_freezemon.pm
View File

@@ -691,7 +691,7 @@ sub freezemon_apptime($) {
#$ret .= $intAt{$i}{TRIGGERTIME} . "-" . $fnname;
$ret .= $intAtA[$i]->{TRIGGERTIME} . "-" . $fnname;
Log3 $name, 5, "[Freezemon] $name Reference found: " . ref($fn) . "/$fnname/$fn";
#Log3 $name, 5, "[Freezemon] $name Reference found: " . ref($fn) . "/$fnname/$fn";
}
else {
#$ret .= $intAt{$i}{TRIGGERTIME} . "-" . $fn;
@@ -706,7 +706,7 @@ sub freezemon_apptime($) {
if ( !defined( $shortarg->{NAME} ) ) {
if ( AttrVal( $name, "fm_extDetail", 0 ) == 1 ) {
if ( $fn eq "BlockingKill" or $fn eq "BlockingStart" ) {
$shortarg = $shortarg->{abortArg}{NAME};
$shortarg = $shortarg->{abortArg}{NAME} if defined($shortarg->{abortArg}{NAME});
}
elsif ( $fn eq "HttpUtils_Err" ) {
if ( defined( $shortarg->{hash}{hash}{NAME} ) ) {
@@ -717,7 +717,7 @@ sub freezemon_apptime($) {
$shortarg = $shortarg->{NotifyFn};
}
else {
Log3 $name, 5, "[Freezemon] $name found something without a name $fn" . Dumper($shortarg);
#Log3 $name, 5, "[Freezemon] $name found something without a name $fn" . Dumper($shortarg);
$shortarg = "N/A";
}
}
@@ -735,7 +735,7 @@ sub freezemon_apptime($) {
$shortarg = $deref->{'hash'}{NAME}; #at least in DOIF_TimerTrigger
}
else {
Log3 $name, 5, "[Freezemon] $name found a REF $fn " . Dumper( ${$arg} );
#Log3 $name, 5, "[Freezemon] $name found a REF $fn " . Dumper( ${$arg} );
}
}
else {
@@ -743,7 +743,7 @@ sub freezemon_apptime($) {
$shortarg = "N/A";
}
if ( !defined($shortarg) ) {
Log3 $name, 5, "Freezemon: something went wrong $fn " . Dumper($arg);
#Log3 $name, 5, "Freezemon: something went wrong $fn " . Dumper($arg);
$shortarg = "";
}
else {