From e96b54c92cdc971b51bd63e6378aa82666a67ff3 Mon Sep 17 00:00:00 2001 From: martinp876 Date: Mon, 22 Jul 2013 05:32:56 +0000 Subject: [PATCH] correct no-response command handling git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@3471 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/10_CUL_HM.pm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/fhem/FHEM/10_CUL_HM.pm b/fhem/FHEM/10_CUL_HM.pm index 765f0c37e..7a212b6df 100755 --- a/fhem/FHEM/10_CUL_HM.pm +++ b/fhem/FHEM/10_CUL_HM.pm @@ -2916,8 +2916,14 @@ sub CUL_HM_responseSetup($$) {#store all we need to handle the response CUL_HM_protState($hash,"CMDs_processing..."); } else{# no answer expected - CUL_HM_protState($hash,"CMDs_done".($hash->{helper}{burstEvtCnt}? + if($hash->{cmdStack} && scalar @{$hash->{cmdStack}}){ + CUL_HM_protState($hash,"CMDs_processing..."); + InternalTimer(gettimeofday()+.5, "CUL_HM_ProcessCmdStack", $hash, 0); + } + else{ + CUL_HM_protState($hash,"CMDs_done".($hash->{helper}{burstEvtCnt}? ("_events:".$hash->{helper}{burstEvtCnt}):"")); + } } if($hash->{cmdStack} && scalar @{$hash->{cmdStack}}){ $hash->{protCmdPend} = scalar @{$hash->{cmdStack}}." CMDs pending";