fix silly perl error in commit d064afc720
This commit is contained in:
parent
d31ae92866
commit
574a1b8fb4
@ -1200,8 +1200,7 @@ sub get_free_port
|
||||
if ($found == 1)
|
||||
{
|
||||
foreach my $addr (qw(127.0.0.1),
|
||||
$use_tcp ? qw(127.0.0.2 127.0.0.3 0.0.0.0) : ())
|
||||
$use_tcp && $TestLib::windows_os
|
||||
($use_tcp && $TestLib::windows_os)
|
||||
? qw(127.0.0.2 127.0.0.3 0.0.0.0)
|
||||
: ())
|
||||
{
|
||||
|
Loading…
x
Reference in New Issue
Block a user