2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-12 13:52:00 +00:00

37_fakeRoku.pm: avoid undef perl waring

git-svn-id: https://svn.fhem.de/fhem/trunk@11686 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
justme-1968 2016-06-18 10:59:34 +00:00
parent e1c04b6e7f
commit d85efb607a

View File

@ -430,7 +430,10 @@ fakeRoku_Parse($$;$$$)
}
}
if( !$params->{MAN} || $params->{MAN} ne '"ssdp:discover"' ) {
if( !$params->{MAN} ) {
Log3 $name, 5, "$name: ignoring broadcast M-Search without MAN";
return undef;
} elsif( $params->{MAN} ne '"ssdp:discover"' ) {
Log3 $name, 5, "$name: ignoring broadcast M-Search with MAN $params->{MAN}";
return undef;
}
@ -536,7 +539,6 @@ fakeRoku_Parse($$;$$$)
'Content-Length' => length($body), } );
$ret .= "\r\n";
$ret .= $body;
Log 1, $ret;
}