mirror of
https://git.postgresql.org/git/postgresql.git
synced 2024-08-29 22:37:20 +02:00
Fix perl warning from commit 9b4eafcaf4
per gripe from Andres Freund and Tom Lane Backpatch to all live branches.
This commit is contained in:
parent
6e639267a5
commit
f4b777e77d
@ -1320,7 +1320,7 @@ sub _reserve_port
|
|||||||
# take an exclusive lock to avoid concurrent access
|
# take an exclusive lock to avoid concurrent access
|
||||||
flock($portfile, LOCK_EX) || die "locking port file $filename: $!";
|
flock($portfile, LOCK_EX) || die "locking port file $filename: $!";
|
||||||
# see if someone else has or had a reservation of this port
|
# see if someone else has or had a reservation of this port
|
||||||
my $pid = <$portfile>;
|
my $pid = <$portfile> || "0";
|
||||||
chomp $pid;
|
chomp $pid;
|
||||||
if ($pid +0 > 0)
|
if ($pid +0 > 0)
|
||||||
{
|
{
|
||||||
|
Loading…
Reference in New Issue
Block a user