From 64ebe63c2c2f52034481a1a719e02703b0425749 Mon Sep 17 00:00:00 2001
From: wherzig <>
Date: Tue, 28 Feb 2012 13:56:49 +0000
Subject: [PATCH] long buffer correct

git-svn-id: https://svn.fhem.de/fhem/trunk@1303 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/45_TRX.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/fhem/FHEM/45_TRX.pm b/fhem/FHEM/45_TRX.pm
index 9502b2e0c..93ed20d0b 100755
--- a/fhem/FHEM/45_TRX.pm
+++ b/fhem/FHEM/45_TRX.pm
@@ -297,7 +297,7 @@ TRX_Read($)
   #Log 1, "TRX: TRX_Read '$hexline'";
 
   # first char as byte represents number of bytes of the message
-  my $num_bytes = ord($TRX_data);
+  my $num_bytes = ord(substr($TRX_data,0,1));
 
   while(length($TRX_data) > $num_bytes) {
     # the buffer contains at least the number of bytes we need
@@ -310,6 +310,7 @@ TRX_Read($)
     #Log 1, "TRX_Read TRX_data '$hexline'";
     #
     TRX_Parse($hash, $hash, $name, unpack('H*', $rmsg));
+    $num_bytes = ord(substr($TRX_data,0,1));
   }
   #Log 1, "TRX_Read END";