diff options
author | Karl Williamson <khw@cpan.org> | 2015-10-12 11:38:35 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2015-10-13 13:09:42 -0600 |
commit | 5c6b968e6cca2d18f9393db35dc90bbb5ed36f1e (patch) | |
tree | c25143df072170e5510fd919b46fef36543c699f | |
parent | 163a633cbf00c0dfe5ec52830b2ffcaebd61dcb0 (diff) | |
download | perl-5c6b968e6cca2d18f9393db35dc90bbb5ed36f1e.tar.gz |
porting/maintainers.t: Skip if -DPERL_EXTERNAL_GLOB
Maintainers requires the internal File::Glob.
I also reordered the skip if VMS test so the skip tests are all adjacent.
-rw-r--r-- | t/porting/maintainers.t | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/t/porting/maintainers.t b/t/porting/maintainers.t index f82656dce0..37e88ea45c 100644 --- a/t/porting/maintainers.t +++ b/t/porting/maintainers.t @@ -19,18 +19,18 @@ if ( $Config{usecrosscompile} ) { skip_all( "Odd failures during cross-compilation" ); } -if ($::IS_EBCDIC) { - skip_all("Fails on EBCDIC machines, prob. because of different sort order"); +if ( $Config{ccflags} =~ /-DPERL_EXTERNAL_GLOB/) { + skip_all "Maintainers doesn't currently work for '-DPERL_EXTERNAL_GLOB'"; } -use strict; -use warnings; -use Maintainers qw(show_results process_options finish_tap_output); - if ($^O eq 'VMS') { skip_all "home-grown glob doesn't handle fancy patterns"; } +use strict; +use warnings; +use Maintainers qw(show_results process_options finish_tap_output); + { local @ARGV = qw|--checkmani|; show_results(process_options()); |