FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-01 01:09:47 +00:00
Code Issues Releases Wiki Activity

repair channel switch at set reegister

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@4753 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2014-01-26 19:32:00 +00:00
parent 7bda5d5a2e
commit 50c139f158
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
fhem/FHEM/10_CUL_HM.pm
View File

@ -3727,7 +3727,8 @@ sub CUL_HM_pushConfig($$$$$$$$@) {#generate messages to config data to register
# my @chSplit = unpack('(A28)*',$change); # my @chSplit = unpack('(A28)*',$change);
my @chSplit = unpack('(A1120)*',$change);# makes max 40 lines, 280 byte my @chSplit = unpack('(A1120)*',$change);# makes max 40 lines, 280 byte
foreach my $chSpl(@chSplit){ foreach my $chSpl(@chSplit){
CUL_HM_PushCmdStack($hash, "++".$flag.'01'.$src.$dst.$chn.'05'. my $mch = CUL_HM_lstCh($chnhash,$list,$chn);
CUL_HM_PushCmdStack($hash, "++".$flag.'01'.$src.$dst.$mch.'05'.
$peerAddr.$peerChn.$list); $peerAddr.$peerChn.$list);
$tl = length($chSpl); $tl = length($chSpl);
for(my $l = 0; $l < $tl; $l+=28) { for(my $l = 0; $l < $tl; $l+=28) {
@ -3735,7 +3736,7 @@ sub CUL_HM_pushConfig($$$$$$$$@) {#generate messages to config data to register
CUL_HM_PushCmdStack($hash, "++A001".$src.$dst.$chn."08". CUL_HM_PushCmdStack($hash, "++A001".$src.$dst.$chn."08".
substr($chSpl,$l,$ml)); substr($chSpl,$l,$ml));
} }
CUL_HM_PushCmdStack($hash,"++A001".$src.$dst.$chn."06"); CUL_HM_PushCmdStack($hash,"++A001".$src.$dst.$mch."06");
} }
######### #########
} }