From b0423eae39e19095f9dec7cc66e61cdbc2299fc3 Mon Sep 17 00:00:00 2001
From: martinp876 <martinp876@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sun, 9 Mar 2014 19:00:00 +0000
Subject: [PATCH] check IOhash set

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

diff --git a/fhem/FHEM/10_CUL_HM.pm b/fhem/FHEM/10_CUL_HM.pm
index 2a9a84d65..48bd19f3e 100755
--- a/fhem/FHEM/10_CUL_HM.pm
+++ b/fhem/FHEM/10_CUL_HM.pm
@@ -2441,7 +2441,6 @@ sub CUL_HM_Get($@) {#+++++++++++++++++ get command+++++++++++++++++++++++++++++
     return "$cmd requires parameter: $h";
   }
   my $devHash = CUL_HM_getDeviceHash($hash);
-  my $id = CUL_HM_IOid($hash);
 
   #----------- now start processing --------------
   if   ($cmd eq "param") {  ###################################################
@@ -4955,8 +4954,8 @@ sub CUL_HM_IOid($) {#in: hash out: id of IO device
   my ($hash) = @_;
   my $dHash = CUL_HM_getDeviceHash($hash);
   my $ioHash = $dHash->{IODev};
-  my $fhtid = defined($ioHash->{FHTID}) ? $ioHash->{FHTID} : "0000";
   return "" if (!$ioHash->{NAME});
+  my $fhtid = defined($ioHash->{FHTID}) ? $ioHash->{FHTID} : "0000";
   return AttrVal($ioHash->{NAME},"hmId","F1$fhtid");
 }
 sub CUL_HM_hash2Id($) {#in: id, out:hash