From de4f3ba44dc71829bad8956ce38b592d233bb38e Mon Sep 17 00:00:00 2001
From: martinp876 <martinp876@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Thu, 18 Jun 2015 06:36:07 +0000
Subject: [PATCH] HMLan: HMUsb first step

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

diff --git a/fhem/FHEM/00_HMLAN.pm b/fhem/FHEM/00_HMLAN.pm
index 38aa77c7f..f97df3c25 100755
--- a/fhem/FHEM/00_HMLAN.pm
+++ b/fhem/FHEM/00_HMLAN.pm
@@ -711,8 +711,7 @@ sub HMLAN_Parse($$) {##########################################################
 
     Dispatch($hash, $dmsg, \%addvals) if($mFld[5] !~ m/99.112999999000000/);#ignore overload test
   }
-  elsif($mFld[0] eq 'HHM-LAN-IF'){#HMLAN version info
-
+  elsif($mFld[0] =~ m /HHM-(LAN|USB)-IF/){#HMLAN version info
     $hash->{uptime} = HMLAN_uptime($mFld[5],$hash);
     
     $hash->{helper}{assIdRep} = hex($mFld[6]);
@@ -726,8 +725,8 @@ sub HMLAN_Parse($$) {##########################################################
     $hash->{helper}{q}{keepAliveRpt} = 0;
     Log3 $hash, ($hash->{helper}{log}{sys}?0:5)
               , 'HMLAN_Parse: '.$name.                 ' V:'.$mFld[1]
-                                   .' sNo:'.$mFld[2].' d:'.$mFld[3]
-                                   .' O:'  .$mFld[4].' t:'.$mFld[5].' IDcnt:'.$mFld[6];
+                                   ." sNo:$mFld[2] d:$mFld[3]"
+                                   ." O:$mFld[4] t:$mFld[5] IDcnt:$mFld[6] L:".hex($mFld[7]);
     my $myId = AttrVal($name, "hmId", "");
     $myId = $attr{$name}{hmId} = $mFld[4] if (!$myId);