hcq/postgresql
1
0
Fork 0
mirror of https://git.postgresql.org/git/postgresql.git synced 2026-02-18 04:17:00 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix perl warning from commit 9b4eafcaf4

Browse Source 
per gripe from Andres Freund and Tom Lane

Backpatch to all live branches.
This commit is contained in:
Andrew Dunstan
2022-11-23 07:17:26 -05:00
parent ec10b6139c
commit 3a2807528e
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/test/perl/PostgresNode.pm
View File

@ -1292,7 +1292,7 @@ sub _reserve_port
# take an exclusive lock to avoid concurrent access
flock($portfile, LOCK_EX) || die "locking port file $filename: $!";
# see if someone else has or had a reservation of this port
my $pid = <$portfile>;
my $pid = <$portfile> || "0";
chomp $pid;
if ($pid +0 > 0)
{