File tree Expand file tree Collapse file tree 1 file changed +2
-13
lines changed Expand file tree Collapse file tree 1 file changed +2
-13
lines changed Original file line number Diff line number Diff line change 11
22# -*-perl-*- hey - emacs - this is a perl file
33
4- # $PostgreSQL: pgsql/src/tools/msvc/vcregress.pl,v 1.9 2008/11/28 23:47:51 tgl Exp $
4+ # $PostgreSQL: pgsql/src/tools/msvc/vcregress.pl,v 1.10 2008/12/01 13:39:45 tgl Exp $
55
66use strict;
77
4949 $schedule = " parallel" if ($what eq ' CHECK' || $what =~ / PARALLEL/ );
5050}
5151
52- my $temp_port ;
53- if (-e " src/tools/msvc/config.pl" )
54- {
55- eval {
56- require " src/tools/msvc/config.pl" ;
57- $temp_port = $config -> {' --with-pgport' };
58- }
59- }
60- $temp_port ||= 55432;
61-
6252my $topdir = getcwd();
6353
6454$ENV {PERL5LIB } = " $topdir /src/tools/msvc" ;
@@ -146,8 +136,7 @@ sub ecpgcheck
146136 " --load-language=plpgsql" ,
147137 " --no-locale" ,
148138 " --temp-install=./tmp_chk" ,
149- " --top-builddir=\" $topdir \" " ,
150- " --port=$temp_port "
139+ " --top-builddir=\" $topdir \" "
151140 );
152141 push (@args ,$maxconn ) if $maxconn ;
153142 system (@args );
You can’t perform that action at this time.
0 commit comments