From b0d22cec76def76bbd83a86e0df83af2af63dbff Mon Sep 17 00:00:00 2001 From: wherzig Date: Sat, 4 May 2013 08:45:43 +0000 Subject: [PATCH] TRX init verify changed git-svn-id: https://svn.fhem.de/fhem/trunk@3151 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/45_TRX.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/45_TRX.pm b/fhem/FHEM/45_TRX.pm index ac8be12c2..43be6905d 100755 --- a/fhem/FHEM/45_TRX.pm +++ b/fhem/FHEM/45_TRX.pm @@ -236,7 +236,7 @@ TRX_DoInit($) if (! $buf) { Log 1, "TRX: Initialization Error: No character read"; return "TRX: Initialization Error $name: no char read"; - } elsif ($buf !~ m/^\x0d\x01\x00.........../) { + } elsif ($buf !~ m/\x0d\x01\x00.........../) { my $hexline = unpack('H*', $buf); Log 1, "TRX: Initialization Error hexline='$hexline'"; return "TRX: Initialization Error %name expected char=0x2c, but char=$char received."; @@ -244,7 +244,7 @@ TRX_DoInit($) Log 1, "TRX: Init OK"; $hash->{STATE} = "Initialized"; # Analyse result and display it: - if ($buf =~ m/^\x0d\x01\x00(.)(.)(.)(.)(.)(.)(.)(.)(.)(.)(.)/) { + if ($buf =~ m/\x0d\x01\x00(.)(.)(.)(.)(.)(.)(.)(.)(.)(.)(.)/) { my $status = ""; my $seqnbr = $1;