diff options
author | Andrew Dunstan <andrew@dunslane.net> | 2021-04-21 11:12:04 -0400 |
---|---|---|
committer | Andrew Dunstan <andrew@dunslane.net> | 2021-04-21 11:16:01 -0400 |
commit | f7ac005c70588b8bedbe5f1a91848e0d1c9b258d (patch) | |
tree | 6945c5a869cbc575a810ee753131c65d344d0f9c | |
parent | b931304506064b7890c712e4c6d925da59f389d5 (diff) | |
download | postgresql-f7ac005c70588b8bedbe5f1a91848e0d1c9b258d.tar.gz postgresql-f7ac005c70588b8bedbe5f1a91848e0d1c9b258d.zip |
fix silly perl error in commit d064afc720
-rw-r--r-- | src/test/perl/PostgresNode.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/test/perl/PostgresNode.pm b/src/test/perl/PostgresNode.pm index 06237a9178b..2505645352e 100644 --- a/src/test/perl/PostgresNode.pm +++ b/src/test/perl/PostgresNode.pm @@ -1172,8 +1172,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) : ()) { |