X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/bc55cddf915d70f806feda38506788f4c61a2574..43f856bae111d54f354ee7393baba1cf1617a769:/t/harness diff --git a/t/harness b/t/harness index 84e3d57..58a212f 100644 --- a/t/harness +++ b/t/harness @@ -189,10 +189,16 @@ if (@ARGV) { # directory containing such files should be tested in serial order. # # Add exceptions to the above rule - for (qw(ext/Pod-Html/t cpan/IO-Zlib)) { + for (qw(ext/Pod-Html/t cpan/IO-Zlib/t ext/File-Find/t)) { $serials{$_} = 1; } + my @nonexistent_serials = grep { not exists $all_dirs{$_} } keys %serials; + if (@nonexistent_serials) { + die "These directories to be run serially don't exist." + . " Check your spelling:\n" . join "\n", @nonexistent_serials; + } + # Remove the serial testing directories from the list of all # directories. The remaining ones are testable in parallel. Make the # parallel list a scalar with names separated by '|' so that below