From 0f58e01b1afe4fd2bc3dcd779337361e9e8e8612 Mon Sep 17 00:00:00 2001
From: KernSani <KernSani@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Wed, 14 Mar 2018 22:22:14 +0000
Subject: [PATCH] 98_freezemon.pm: removed unnecessary blockingCall, bugfixes &
 removed some Debugging Info

git-svn-id: https://svn.fhem.de/fhem/trunk@16411 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/98_freezemon.pm | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/fhem/FHEM/98_freezemon.pm b/fhem/FHEM/98_freezemon.pm
index 7972a26bb..4ebc05e61 100644
--- a/fhem/FHEM/98_freezemon.pm
+++ b/fhem/FHEM/98_freezemon.pm
@@ -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 {