X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=utils%2Fxsubpp.PL;h=785ca821c3ad853ea09a2bde3f65d342e5e8cea2;hb=9d6c7f2eccef26a6d6eb46a8192949a88c6aaf8f;hp=c857df48e9916ece97eb23dd506c216e83954a56;hpb=4822030c168a634e0e2adb4eaa6369019c959730;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/utils/xsubpp.PL b/utils/xsubpp.PL
index c857df4..785ca82 100644
--- a/utils/xsubpp.PL
+++ b/utils/xsubpp.PL
@@ -35,7 +35,8 @@ use File::Spec;
 
 my $xsubpp = File::Spec->catfile(File::Spec->catdir(File::Spec->updir,
 						    qw(ext ExtUtils-ParseXS
-						       lib ExtUtils xsubpp)));
+						       lib ExtUtils)),
+				 'xsubpp');
 
 if (open(XSUBPP, $xsubpp)) {
     print OUT <XSUBPP>;