From fd800444b139c741f8563b133dec6be0522e85d3 Mon Sep 17 00:00:00 2001
From: martinp876 <martinp876@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sun, 6 Apr 2014 16:11:20 +0000
Subject: [PATCH] init sequece problem

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@5459 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/10_CUL_HM.pm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/fhem/FHEM/10_CUL_HM.pm b/fhem/FHEM/10_CUL_HM.pm
index f1d4c6147..53cd77693 100755
--- a/fhem/FHEM/10_CUL_HM.pm
+++ b/fhem/FHEM/10_CUL_HM.pm
@@ -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);
       }
     }
   }