From 3bd9d532fde8b6f0360510c74d22f85a2a7174d1 Mon Sep 17 00:00:00 2001 From: martinp876 <> Date: Fri, 28 Aug 2015 21:12:25 +0000 Subject: [PATCH] 10CUL_HM: remove debug info git-svn-id: https://svn.fhem.de/fhem/trunk@9150 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/10_CUL_HM.pm | 11 +++-------- 1 file changed, 3 insertions(+), 8 deletions(-) diff --git a/fhem/FHEM/10_CUL_HM.pm b/fhem/FHEM/10_CUL_HM.pm index 763866bd0..9a35c387f 100755 --- a/fhem/FHEM/10_CUL_HM.pm +++ b/fhem/FHEM/10_CUL_HM.pm @@ -5982,10 +5982,9 @@ sub CUL_HM_statCntRfresh($) {# update statistic once a day sub CUL_HM_respPendRm($) {#del response related entries in messageing entity my ($hash) = @_; - if (!defined($hash->{DEF})){ - Log 1,"CUL_HM error removing pending commands";#General remove once found - return; - } + + return if (!defined($hash->{DEF})); + $modules{CUL_HM}{prot}{rspPend}-- if($hash->{helper}{prt}{rspWait}{cmd}); delete $hash->{helper}{prt}{rspWait}; delete $hash->{helper}{prt}{wuReSent}; @@ -6000,10 +5999,6 @@ sub CUL_HM_respPendTout($) { my ($HMidIn) = @_; my(undef,$HMid) = split(":",$HMidIn,2); my $hash = $modules{CUL_HM}{defptr}{$HMid}; - if (!defined($hash)){ - Log 1,"CUL_HM error removing timer for $HMidIn";#General remove once found - return; - } my $pHash = $hash->{helper}{prt};#shortcut if ($hash && $hash->{DEF} ne '000000'){# we know the device