mirror/postgresql
2
0
Fork 0
mirror of https://git.postgresql.org/git/postgresql.git synced 2025-02-23 19:39:53 +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:03:06 -05:00
parent 2debceed29
commit 2c0d0ee761
No known key found for this signature in database
GPG Key ID: 99FA7FCB59FC3B81
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/test/perl/PostgreSQL/Test/Cluster.pm
View File

@ -1592,7 +1592,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)
{