From b0fd55782d58b3c51b6b8c42c4bf5cbef0cf2008 Mon Sep 17 00:00:00 2001
From: martinp876 <>
Date: Fri, 15 Aug 2014 10:05:06 +0000
Subject: [PATCH] improve IO selection

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

diff --git a/fhem/FHEM/10_CUL_HM.pm b/fhem/FHEM/10_CUL_HM.pm
index c14f7a5a1..d01377a79 100755
--- a/fhem/FHEM/10_CUL_HM.pm
+++ b/fhem/FHEM/10_CUL_HM.pm
@@ -1645,7 +1645,7 @@ sub CUL_HM_Parse($$) {#########################################################
         }
       }
       if ($st ne "switch"){
-        my $dir = $err&0x30;
+        my $dir = $err & 0x30;
         if   ($dir == 0x10){push @evtEt,[$shash,1,"$eventName:up:$vs"  ];}
         elsif($dir == 0x20){push @evtEt,[$shash,1,"$eventName:down:$vs"];}
         elsif($dir == 0x00){push @evtEt,[$shash,1,"$eventName:stop:$vs"];}
@@ -2085,7 +2085,7 @@ sub CUL_HM_Parse($$) {#########################################################
           if ($mFlgH & 0x20){
             $longPress .= "_Release";
             $dChHash->{helper}{trgLgRpt}=0;
-            push @ack,$dstH,$mNo."8002".$dst.$src.$stAck;
+            push @ack,$shash,$mNo."8002".$dst.$src.$stAck;
           }
           push @evtEt,[$dChHash,1,"state:$stT"];
           push @evtEt,[$dChHash,1,"virtActState:$stT"];
diff --git a/fhem/FHEM/HMConfig.pm b/fhem/FHEM/HMConfig.pm
index 64ecb34cf..e3b2fb886 100644
--- a/fhem/FHEM/HMConfig.pm
+++ b/fhem/FHEM/HMConfig.pm
@@ -1303,7 +1303,6 @@ $culHmRegChan{"ROTO_ZEL-STG-RM-FWT03"}= $culHmRegChan{"HM-CC-TC03"};
                       ,getConfig     => ""
                       ,regSet        => "[prep|exec] <regName> <value> ... [<peerChannel>]"
                       ,clear         => "[readings|trigger|register|rssi|msgEvents|all]"
-                      ,getVersion    => ""
 );
 %culHmGlobalSetsVrtDev = (# virtuals and devices without subtype
                        raw           => "data ..."
@@ -1317,8 +1316,7 @@ $culHmRegChan{"ROTO_ZEL-STG-RM-FWT03"}= $culHmRegChan{"HM-CC-TC03"};
 );
 
 %culHmSubTypeDevSets = (# device of this subtype
-  switch           =>{ statusRequest => ""
-                      ,getSerial     => ""
+  switch           =>{ getSerial     => ""
                       ,pair          => ""
                       ,getVersion    => ""
                        },