database/postgres
1
0
Fork 0
mirror of https://github.com/postgres/postgres.git synced 2025-06-26 12:21:12 +03:00
Code Activity

Prevent possibly spurious error when running perl -cw

Browse Source
This commit is contained in:
Andrew Dunstan
2018-05-18 10:46:38 -04:00
parent 9effb63e0d
commit 3dacd9bf32
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/tools/msvc/Mkvcbuild.pm
View File

@ -691,7 +691,7 @@ sub mkvcbuild
(my $xsc = $xs) =~ s/\.xs/.c/; (my $xsc = $xs) =~ s/\.xs/.c/;
if (Solution::IsNewer("$plperlsrc$xsc", "$plperlsrc$xs")) if (Solution::IsNewer("$plperlsrc$xsc", "$plperlsrc$xs"))
{ {
my $xsubppdir = first { -e "$_/ExtUtils/xsubpp" } @INC; my $xsubppdir = first { -e "$_/ExtUtils/xsubpp" } (@INC);
print "Building $plperlsrc$xsc...\n"; print "Building $plperlsrc$xsc...\n";
system( $solution->{options}->{perl} system( $solution->{options}->{perl}
. '/bin/perl ' . '/bin/perl '