45_TRX.pm: Fix "undefined" warning

git-svn-id: https://svn.fhem.de/fhem/trunk@16666 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
KernSani 2018-04-27 22:14:50 +00:00
parent 6b2f119ab6
commit 4e7550b226

View File

@ -282,8 +282,9 @@ sub TRX_DoInit($) {
my $msg3 = ord( pack( 'H*', $5 ) ); my $msg3 = ord( pack( 'H*', $5 ) );
my $msg4 = ord( pack( 'H*', $6 ) ); my $msg4 = ord( pack( 'H*', $6 ) );
my $msg5 = ord( pack( 'H*', $7 ) ); my $msg5 = ord( pack( 'H*', $7 ) );
my $msg6 = ord( pack( 'H*', $8 ) ) if $fw == 2; my $msg6 = "";
my $freq = { $msg6 = ord( pack( 'H*', $8 ) ) if $fw == 2;
my $freq = {
'50' => '310MHz', '50' => '310MHz',
'51' => '315MHz', '51' => '315MHz',
'52' => '433.92MHz receiver only', '52' => '433.92MHz receiver only',
@ -298,14 +299,15 @@ sub TRX_DoInit($) {
}->{$msg1} }->{$msg1}
|| 'unknown Mhz'; || 'unknown Mhz';
$status .= $freq; $status .= $freq;
my $firmware = ""; my $firmware = "";
if ($fw==2) {
$firmware = $msg2 + 1000; if ( $fw == 2 ) {
} $firmware = $msg2 + 1000;
else { }
$firmware = $msg2; else {
} $firmware = $msg2;
}
$status .= ", " . sprintf "firmware=%d", $firmware; $status .= ", " . sprintf "firmware=%d", $firmware;
my $protocols = ""; my $protocols = "";
$status .= ", protocols enabled: "; $status .= ", protocols enabled: ";