init sequece problem

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@5459 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876
2014-04-06 16:11:20 +00:00
parent 14a5333877
commit fd800444b1

View File

@@ -1936,7 +1936,7 @@ sub CUL_HM_Parse($$) {#########################################################
push @entities,CUL_HM_pushEvnts();
@entities = CUL_HM_noDup(@entities,$shash->{NAME});
$defs{$_}{".noDispatchVars"} = 1 foreach (grep !/$name/,@entities);
$defs{$_}{".noDispatchVars"} = 1 foreach (grep !/$devH->{NAME}/,@entities);
return @entities;
}
@@ -5010,10 +5010,12 @@ sub CUL_HM_ID2PeerList ($$$) {
||($md eq "HM-TC-IT-WM-W-EU" && $chn=~ m/(07)/)){
if ($chn eq "04"){
#if 04 is peered we are "teamed" -> set channel 05
CUL_HM_UpdtReadSingle($modules{CUL_HM}{defptr}{$dHash->{DEF}."05"},"state","peered");
my $ch05H = $modules{CUL_HM}{defptr}{$dHash->{DEF}."05"};
CUL_HM_UpdtReadSingle($ch05H,"state","peered",0)
if($ch05H);
}
else{
CUL_HM_UpdtReadSingle($hash,"state","peered");
CUL_HM_UpdtReadSingle($hash,"state","peered",0);
}
}
}