From 89d521dfb595bbfda4b4be0f0ef6ae2123708a65 Mon Sep 17 00:00:00 2001
From: wherzig <wherzig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Tue, 28 Feb 2012 13:56:49 +0000
Subject: [PATCH] long buffer correct

git-svn-id: svn://svn.code.sf.net/p/fhem/code/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";