diff --git a/fhem/FHEM/10_CUL_HM.pm b/fhem/FHEM/10_CUL_HM.pm index 1c47742f2..33696f59a 100755 --- a/fhem/FHEM/10_CUL_HM.pm +++ b/fhem/FHEM/10_CUL_HM.pm @@ -750,9 +750,6 @@ sub CUL_HM_hmInitMsgUpdt($){ #update device init msg for HMLAN my $oldChn = $hash->{helper}{io}{newChn}; my @p = unpack 'A8A2A*',$oldChn; - #if($hash->{helper}{q}{qReqConf} || - # $hash->{helper}{q}{qReqStat} || - # $hash->{helper}{prt}{sProc}){ if($hash->{helper}{prt}{sProc}){ $p[1] |= 2; } @@ -5121,8 +5118,7 @@ sub CUL_HM_protState($$){ Log3 $name,5,"CUL_HM $name protEvent:$state". ($hash->{cmdStack}?" pending:".scalar @{$hash->{cmdStack}}:""); CUL_HM_hmInitMsgUpdt($hash) if ( $hash->{helper}{prt}{sProc} != $sProcIn - &&$hash->{helper}{prt}{sProc} == 0 - ||$hash->{helper}{prt}{sProc} == 2); + && $hash->{helper}{prt}{sProc} < 2); } ###################-----------helper and shortcuts--------##################### @@ -6499,7 +6495,6 @@ sub CUL_HM_qEntity($$){ # add to queue my $wT = (@{$modules{CUL_HM}{helper}{qReqStat}})? "1": $modules{CUL_HM}{hmAutoReadScan}; - CUL_HM_hmInitMsgUpdt($defs{$devN}); RemoveInternalTimer("CUL_HM_procQs"); InternalTimer(gettimeofday()+ $wT,"CUL_HM_procQs","CUL_HM_procQs", 0); } diff --git a/fhem/FHEM/98_HMinfo.pm b/fhem/FHEM/98_HMinfo.pm index 484a55af3..c7966fae7 100644 --- a/fhem/FHEM/98_HMinfo.pm +++ b/fhem/FHEM/98_HMinfo.pm @@ -837,12 +837,12 @@ sub HMinfo_GetFn($@) {######################################################### $ret .= "\n"; $ret .= "\n requests pending"; $ret .= "\n ----------------"; - $ret .= "\n autoReadReg :".join(", ",@{$modules{CUL_HM}{helper}{qReqConf}}); - $ret .= "\n recent :".($modules{CUL_HM}{helper}{autoRdActive}?$modules{CUL_HM}{helper}{autoRdActive}:"none"); - $ret .= "\n status request :".join(", ",@{$modules{CUL_HM}{helper}{qReqStat}}) ; - $ret .= "\n autoReadReg wakeup :".join(", ",@{$modules{CUL_HM}{helper}{qReqConfWu}}); - $ret .= "\n status request wakeup:".join(", ",@{$modules{CUL_HM}{helper}{qReqStatWu}}); - $ret .= "\n autoReadTest :".join(", ",@{$modules{CUL_HM}{helper}{confCheckArr}}); + $ret .= "\n autoReadReg : ".join(" ",@{$modules{CUL_HM}{helper}{qReqConf}}); + $ret .= "\n recent : ".($modules{CUL_HM}{helper}{autoRdActive}?$modules{CUL_HM}{helper}{autoRdActive}:"none"); + $ret .= "\n status request : ".join(" ",@{$modules{CUL_HM}{helper}{qReqStat}}) ; + $ret .= "\n autoReadReg wakeup : ".join(" ",@{$modules{CUL_HM}{helper}{qReqConfWu}}); + $ret .= "\n status request wakeup: ".join(" ",@{$modules{CUL_HM}{helper}{qReqStatWu}}); + $ret .= "\n autoReadTest : ".join(" ",@{$modules{CUL_HM}{helper}{confCheckArr}}); $ret .= "\n"; @IOlist = HMinfo_noDup(@IOlist); foreach(@IOlist){