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 2772c72 commit 80d00e5Copy full SHA for 80d00e5
t/basic.t
@@ -71,7 +71,10 @@ ok( setup_recurs(), 'setup' );
71
ok( chdir('Big-Dummy'), "chdir'd to Big-Dummy" ) ||
72
diag("chdir failed: $!");
73
74
-sub extrachar { $] > 5.008 && !$ENV{PERL_CORE} ? utf8::decode(my $c='š') : 's' }
+sub extrachar {
75
+ return 's' if $] <= 5.008 || $ENV{PERL_CORE} || $^O =~ /bsd|dragonfly/i;
76
+ 'š';
77
+}
78
my $DUMMYINST = '../dummy-in'.extrachar().'tall';
79
my @mpl_out = run(qq{$perl Makefile.PL "PREFIX=$DUMMYINST"});
80
0 commit comments