From 322deddd8e19e43f035324fab4592d6f3d9b7f09 Mon Sep 17 00:00:00 2001 From: martinp876 <> Date: Wed, 27 Aug 2014 12:32:38 +0000 Subject: [PATCH] Overload detection handling git-svn-id: https://svn.fhem.de/fhem/trunk@6471 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/00_HMLAN.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/00_HMLAN.pm b/fhem/FHEM/00_HMLAN.pm index 3a890ecde..330fd983a 100755 --- a/fhem/FHEM/00_HMLAN.pm +++ b/fhem/FHEM/00_HMLAN.pm @@ -561,7 +561,6 @@ sub HMLAN_Parse($$) {########################################################## if ($letter =~ m/^[ER]/){#@mFld=($src, $status, $msec, $d2, $rssi, $msg) # max speed for devices is 100ms after receive - example:TC - return if($mFld[5] =~ m/99.112999999000000/);#ignore overload test my ($mNo,$flg,$type,$src,$dst,$p) = unpack('A2A2A2A6A6A*',$mFld[5]); my $mLen = length($mFld[5])/2; my $CULinfo = ""; @@ -704,7 +703,8 @@ sub HMLAN_Parse($$) {########################################################## my $dmsg = sprintf("A%02X%s:$CULinfo:$rssi:$name", $mLen, uc($mFld[5])); my %addvals = (RAWMSG => $rmsg, RSSI => hex($mFld[4])-65536); - Dispatch($hash, $dmsg, \%addvals); + + Dispatch($hash, $dmsg, \%addvals) if($mFld[5] !~ m/99.112999999000000/);#ignore overload test } elsif($mFld[0] eq 'HHM-LAN-IF'){#HMLAN version info