From 4a9018135a37203e176a561913453b38788ac7da Mon Sep 17 00:00:00 2001
From: Andrew Dunstan <andrew@dunslane.net>
Date: Sun, 27 Nov 2011 01:23:47 -0500
Subject: [PATCH] Fix MSVC builds broken by xsubpp change
---
src/tools/msvc/Mkvcbuild.pm | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/src/tools/msvc/Mkvcbuild.pm b/src/tools/msvc/Mkvcbuild.pm
index e9e8f2fe7b1..482f10051b1 100644
--- a/src/tools/msvc/Mkvcbuild.pm
+++ b/src/tools/msvc/Mkvcbuild.pm
@@ -108,11 +108,10 @@ sub mkvcbuild
(my $xsc = $xs) =~ s/\.xs/.c/;
if (Solution::IsNewer("$plperlsrc$xsc","$plperlsrc$xs"))
{
- my $xsubppdir = first { -e "$_\\ExtUtils\\xsubpp.BAT" } @INC;
+ my $xsubppdir = first { -e "$_\\ExtUtils\\xsubpp" } @INC;
print "Building $plperlsrc$xsc...\n";
system( $solution->{options}->{perl}
. '/bin/perl '
- . $solution->{options}->{perl}
. "$xsubppdir/ExtUtils/xsubpp -typemap "
. $solution->{options}->{perl}
. '/lib/ExtUtils/typemap '
--
GitLab