Prevent possibly spurious error when running perl -cw
This commit is contained in:
parent
9effb63e0d
commit
3dacd9bf32
|
@ -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 '
|
||||||
|
|
Loading…
Reference in New Issue