FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-12 20:02:00 +00:00
Code Issues Releases Wiki Activity

37_fakeRoku.pm: avoid undef perl waring

Browse Source 
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
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
fhem/FHEM/37_fakeRoku.pm
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}"; Log3 $name, 5, "$name: ignoring broadcast M-Search with MAN $params->{MAN}";
return undef; return undef;
} }
@ -536,7 +539,6 @@ fakeRoku_Parse($$;$$$)
'Content-Length' => length($body), } ); 'Content-Length' => length($body), } );
$ret .= "\r\n"; $ret .= "\r\n";
$ret .= $body; $ret .= $body;
Log 1, $ret;
} }