From 4135173f1eacab31b4455ee6c672262a454e3940 Mon Sep 17 00:00:00 2001 From: rudolfkoenig Date: Sun, 25 Oct 2009 10:14:22 +0000 Subject: [PATCH] Fix of Fix git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@451 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/00_CUL.pm | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/fhem/FHEM/00_CUL.pm b/fhem/FHEM/00_CUL.pm index a443df2db..849bf85be 100755 --- a/fhem/FHEM/00_CUL.pm +++ b/fhem/FHEM/00_CUL.pm @@ -13,6 +13,7 @@ sub CUL_Read($); sub CUL_ReadAnswer($$$); sub CUL_Ready($); sub CUL_HandleCurRequest($$); +sub CUL_HandleWriteQueue($); sub CUL_OpenDev($$); sub CUL_CloseDev($); @@ -630,10 +631,13 @@ CUL_HandleWriteQueue($) return; } my $bstring = $arr->[0]; - next if($bstring eq "-"); - CUL_XmitLimitCheck($hash,$bstring); - CUL_SimpleWrite($hash, $bstring); - InternalTimer(gettimeofday()+0.3, "CUL_HandleWriteQueue", $hash, 1); + if($bstring eq "-") { + CUL_HandleWriteQueue($hash); + } else { + CUL_XmitLimitCheck($hash,$bstring); + CUL_SimpleWrite($hash, $bstring); + InternalTimer(gettimeofday()+0.3, "CUL_HandleWriteQueue", $hash, 1); + } } }