We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 1462134 commit f2ed880Copy full SHA for f2ed880
dist/Devel-PPPort/Makefile.PL
@@ -23,6 +23,14 @@ use Config;
23
24
use vars '%opt'; # needs to be global, and we can't use 'our'
25
26
+sub cat_file
27
+{
28
+ eval { require File::Spec };
29
+ return $@ ? join('/', @_) : File::Spec->catfile(@_);
30
+}
31
+
32
+my $t_01_test = cat_file('t', '01_test.t');
33
34
unless ($ENV{'PERL_CORE'}) {
35
$ENV{'PERL_CORE'} = 1 if grep { $_ eq 'PERL_CORE=1' } @ARGV;
36
}
@@ -52,7 +60,7 @@ sub configure
52
60
'ppport_h.PL' => 'ppport.h',
53
61
'PPPort_pm.PL' => 'PPPort.pm',
54
62
'RealPPPort_xs.PL' => 'RealPPPort.xs',
55
- 'mktests.PL' => 't/01_test.t',
63
+ 'mktests.PL' => $t_01_test,
56
64
);
57
65
my @moreopts;
58
66
0 commit comments