FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-17 05:16:02 +00:00
Code Issues Releases Wiki Activity

10_CUL_HM: code cleanup

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@9104 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2015-08-22 05:38:59 +00:00
parent e5cebbe7c6
commit b4e996408e
1 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
fhem/FHEM/10_CUL_HM.pm
View File

@ -5982,6 +5982,10 @@ 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;
}
$modules{CUL_HM}{prot}{rspPend}-- if($hash->{helper}{prt}{rspWait}{cmd});
delete $hash->{helper}{prt}{rspWait};
delete $hash->{helper}{prt}{wuReSent};
@ -5993,9 +5997,14 @@ sub CUL_HM_respPendRm($) {#del response related entries in messageing entity
$respRemoved = 1;
}
sub CUL_HM_respPendTout($) {
my ($HMid) = @_;
(undef,$HMid) = split(":",$HMid,2);
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
my $name = $hash->{NAME};