diff options
-rw-r--r-- | dist/Devel-PPPort/Makefile.PL | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/dist/Devel-PPPort/Makefile.PL b/dist/Devel-PPPort/Makefile.PL index cd0c49325e..e2a54f7c4c 100644 --- a/dist/Devel-PPPort/Makefile.PL +++ b/dist/Devel-PPPort/Makefile.PL @@ -23,6 +23,14 @@ use Config; use vars '%opt'; # needs to be global, and we can't use 'our' +sub cat_file +{ + eval { require File::Spec }; + return $@ ? join('/', @_) : File::Spec->catfile(@_); +} + +my $t_01_test = cat_file('t', '01_test.t'); + unless ($ENV{'PERL_CORE'}) { $ENV{'PERL_CORE'} = 1 if grep { $_ eq 'PERL_CORE=1' } @ARGV; } @@ -52,7 +60,7 @@ sub configure 'ppport_h.PL' => 'ppport.h', 'PPPort_pm.PL' => 'PPPort.pm', 'RealPPPort_xs.PL' => 'RealPPPort.xs', - 'mktests.PL' => 't/01_test.t', + 'mktests.PL' => $t_01_test, ); my @moreopts; |