4Dis text bugfix

git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@891 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2011-04-22 08:13:47 +00:00
parent 7a914b83f2
commit 93a263e521

View File

@@ -244,6 +244,7 @@ CUL_HM_Parse($$)
if($cmd eq "8002") { # Ack if($cmd eq "8002") { # Ack
if($shash->{cmdStack}) { # Send next msg from the stack if($shash->{cmdStack}) { # Send next msg from the stack
Log 1, "PopCmd:" . $shash->{cmdStack}->[0];
CUL_HM_SendCmd($shash, shift @{$shash->{cmdStack}}, 1, 1); CUL_HM_SendCmd($shash, shift @{$shash->{cmdStack}}, 1, 1);
delete($shash->{cmdStack}) if(!@{$shash->{cmdStack}}); delete($shash->{cmdStack}) if(!@{$shash->{cmdStack}});
$shash->{lastStackAck} = 1; $shash->{lastStackAck} = 1;
@@ -781,8 +782,7 @@ CUL_HM_Pair(@)
} }
delete($hash->{cmdStack}); # delete($hash->{cmdStack}); # Why? Disables 4Dis text commands
if($stn ne "remote") { if($stn ne "remote") {
CUL_HM_pushConfig($hash, $id, $src, 0, 0, "0201$idstr"); CUL_HM_pushConfig($hash, $id, $src, 0, 0, "0201$idstr");
CUL_HM_SendCmd($hash, shift @{$hash->{cmdStack}}, 1, 1); CUL_HM_SendCmd($hash, shift @{$hash->{cmdStack}}, 1, 1);
@@ -846,6 +846,7 @@ CUL_HM_PushCmdStack($$)
my ($hash, $cmd) = @_; my ($hash, $cmd) = @_;
my @arr = (); my @arr = ();
$hash->{cmdStack} = \@arr if(!$hash->{cmdStack}); $hash->{cmdStack} = \@arr if(!$hash->{cmdStack});
Log 1, "PushStack: $cmd";
push(@{$hash->{cmdStack}}, $cmd); push(@{$hash->{cmdStack}}, $cmd);
} }