From: Andrew Dunstan <andrew@dunslane.net>
Date: Fri, 28 May 2021 13:26:30 +0000 (-0400)
Subject: Report configured port in MSVC built pg_config
X-Git-Tag: REL9_6_23~93
X-Git-Url: http://git.postgresql.org/gitweb/?a=commitdiff_plain;h=abbd70022c17f541e7d05163b80631aa722fd58e;p=postgresql.git

Report configured port in MSVC built pg_config

This is a long standing omission, discovered when trying to write code
that relied on it.

Backpatch to all live branches.
---

diff --git a/src/tools/msvc/Solution.pm b/src/tools/msvc/Solution.pm
index d7388606332..fdfcbb73dd7 100644
--- a/src/tools/msvc/Solution.pm
+++ b/src/tools/msvc/Solution.pm
@@ -790,6 +790,8 @@ sub GetFakeConfigure
 	$cfg .= ' --with-tcl'           if ($self->{options}->{tcl});
 	$cfg .= ' --with-perl'          if ($self->{options}->{perl});
 	$cfg .= ' --with-python'        if ($self->{options}->{python});
+	my $port = $self->{options}->{'--with-pgport'};
+	$cfg .= " --with-pgport=$port" if defined($port)
 
 	return $cfg;
 }