This repository was archived by the owner on Jun 1, 2023. It is now read-only.
File tree Expand file tree Collapse file tree 3 files changed +10
-3
lines changed Expand file tree Collapse file tree 3 files changed +10
-3
lines changed Original file line number Diff line number Diff line change @@ -128,6 +128,8 @@ package Maintainers;
128128 qw( t/07_ptardiff.t
129129 t/99_pod.t) ,
130130 ],
131+ # CPAN RT 121685
132+ ' CUSTOMIZED' => [ qw( t/90_symlink.t ) ],
131133 },
132134
133135 ' Attribute::Handlers' => {
Original file line number Diff line number Diff line change @@ -6,9 +6,13 @@ use strict;
66use File::Spec;
77use File::Path;
88use Test::More;
9+ use Config;
910
10- # ## developer tests mostly, so enable them with an extra argument
11- plan skip_all => " Skipping tests on this platform" unless @ARGV ;
11+ # ## developer tests mostly
12+ plan skip_all => " Skipping tests on this platform"
13+ if ($^O !~ / (linux|bsd|darwin|solaris|hpux|aix|
14+ sunos|dynixptx|haiku|irix|next|dec_osf|svr4|sco_sv|unicos|
15+ cygwin)/x and !$Config {d_symlink });
1216plan ' no_plan' ;
1317
1418my $Class = ' Archive::Tar' ;
@@ -42,7 +46,7 @@ use_ok( $Class );
4246 ok( 1, " Extracting with insecure mode: $mode " );
4347
4448 my $warning ;
45- local $SIG {__WARN__ } = sub { $warning .= " @_ " ; warn @_ ; };
49+ local $SIG {__WARN__ } = sub { $warning .= " @_ " };
4650
4751 my $rv = eval { $tar -> extract } || 0;
4852 ok( !$@ , " No fatal error" );
Original file line number Diff line number Diff line change 1+ Archive::Tar cpan/Archive-Tar/t/90_symlink.t 66a29edeff869c6569051aaecfc59b6624477be9
12B::C cpan/B-C/t/test10 0b3ab672868ee49e8539649aad1ad8c940c4c420
23CPAN cpan/CPAN/lib/App/Cpan.pm fcfc8800fa3dbff061da3688ad6a6fdd3716fbc8
34CPAN cpan/CPAN/lib/CPAN.pm 0eb7416798046db5d8f923de1861280698e96634
You can’t perform that action at this time.
0 commit comments