From 72f5fb84c40a18d50fe56227ff5bf45f6bc03acf Mon Sep 17 00:00:00 2001
From: martinp876 <martinp876@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Wed, 27 Aug 2014 09:09:40 +0000
Subject: [PATCH] minor bug

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

diff --git a/fhem/FHEM/10_CUL_HM.pm b/fhem/FHEM/10_CUL_HM.pm
index 1c6518bbe..7beb16605 100755
--- a/fhem/FHEM/10_CUL_HM.pm
+++ b/fhem/FHEM/10_CUL_HM.pm
@@ -225,7 +225,8 @@ sub CUL_HM_updateConfig($){
       $attr{$name}{model} = "ActionDetector";
       delete $hash->{helper}{role};
       delete $attr{$name}{$_}
-            foreach ("autoReadReg","actCycle","actStatus","burstAccess","serialNr"); 
+            foreach ( "autoReadReg","actCycle","actStatus","burstAccess","serialNr"
+                     ,"IODev","IOList","IOgrp","hmProtocolEvents","rssiLog"); 
       $hash->{helper}{role}{vrt} = 1;
       next;
     }
@@ -3014,7 +3015,8 @@ sub CUL_HM_Get($@) {#+++++++++++++++++ get command+++++++++++++++++++++++++++++
       foreach (@dl){
         my(undef,$pref) = split":",$attr{$_}{IOgrp},2;
         $pref =  "---" if (!$pref);
-        push @rl, "$defs{$_}{IODev}->{NAME} / $pref $_ ";
+        my $IODev = $defs{$_}{IODev}->{NAME}?$defs{$_}{IODev}->{NAME}:"---";
+        push @rl, "$IODev / $pref $_ ";
       }
       return "devices using $name\ncurrent IO / preferred\n  ".join "\n  ", sort @rl;
     }