From 28230aa7c090cb5df036264c7c2e40dce8555bb2 Mon Sep 17 00:00:00 2001
From: martinp876 <>
Date: Sat, 13 Apr 2019 18:05:18 +0000
Subject: [PATCH] CUL_HM: update bug with unknown model attribut.

git-svn-id: https://svn.fhem.de/fhem/trunk@19174 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/10_CUL_HM.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/fhem/FHEM/10_CUL_HM.pm b/fhem/FHEM/10_CUL_HM.pm
index 232dc32db..4fc339203 100755
--- a/fhem/FHEM/10_CUL_HM.pm
+++ b/fhem/FHEM/10_CUL_HM.pm
@@ -1951,7 +1951,7 @@ sub CUL_HM_Parse($$) {#########################################################
       push @evtEt,[$mh{shash},1,"time-request"];
     }
   }
-  elsif($mh{md} =~ m/^(HM-Sen-Wa-Od|HM-CC-SCD)$/){ ############################
+  elsif($mh{md} =~ m/^(HM-SEN-WA-OD|HM-CC-SCD)$/){ ############################
     if (($mh{mTyp} eq "0201") ||  # handle Ack_Status
         ($mh{mTyp} eq "1006") ||  #or Info_Status message here
         ($mh{mTp} eq "41"))                {
@@ -1966,7 +1966,7 @@ sub CUL_HM_Parse($$) {#########################################################
       push @evtEt,[$mh{devH} ,1,"battery:".($err&0x80?"low":"ok")] if ($err ne "");
     }
   }
-  elsif($mh{md} eq "KFM-Sensor") { ############################################
+  elsif($mh{md} eq "KFM-SENSOR") { ############################################
     if ($mh{mTp} eq "53"){
       if($mh{p} =~ m/^(..)4(.)0200(..)(..)(..)/) {
         my ($chn,$seq, $k_v1, $k_v2, $k_v3) = (hex($1),hex($2),$3,hex($4),hex($5));
@@ -7834,8 +7834,9 @@ sub CUL_HM_getMId($) {     #in: hash(chn or dev) out:model key (key for %culHmMo
     $hash->{helper}{mId}     = CUL_HM_getmIdFromModel(AttrVal($hash->{NAME}, "model", ""));
     $hash->{helper}{mId}     = CUL_HM_getmIdFromModel($culHmModel->{$hash->{helper}{mId}}{alias})    
                                if ($hash->{helper}{mId} && defined $culHmModel->{$hash->{helper}{mId}}{alias});
-    $attr{$hash->{NAME}}{subType} = $hash->{helper}{mId} ? $culHmModel->{$hash->{helper}{mId}}{st}:"";
+    $attr{$hash->{NAME}}{subType} = $hash->{helper}{mId} ? $culHmModel->{$hash->{helper}{mId}}{st}:"no";
     #--- mId is updated - now update the reglist
+    return "" if ($hash->{helper}{mId} eq "no");
     foreach(CUL_HM_getAssChnNames($hash->{NAME})){
       $defs{$_}{helper}{regLst}     = CUL_HM_getChnList($_) ;
       $defs{$_}{helper}{peerOpt}    = CUL_HM_getChnPeers($_);