use Test::More;
BEGIN {
- plan skip_all => 'This test will not run unless you set MOOSE_TEST_MD to a true value'
+ my $help = <<'EOF';
+
+
+ This test will not run unless you set MOOSE_TEST_MD to a true value.
+ Valid values are:
+
+ all Test every distro which depends on Moose except those that we know
+ cannot be tested. This is a lot of distros (thousands).
+
+ MooseX Test all Moose extension distros
+ (MooseX modules plus a few others).
+
+ $true Any other true value runs the default tests. We pick 200 random
+ distros and test them.
+
+EOF
+
+ plan skip_all => $help
unless $ENV{MOOSE_TEST_MD};
}
map { $_->{fields}{distribution} }
@{ $res->{hits}{hits} };
-unless ( $ENV{MOOSE_TEST_MD} eq 'all' ) {
+if ( $ENV{MOOSE_TEST_MD} eq 'MooseX' ) {
+ @dists = grep { /^(?:MooseX-|Fey-ORM)/ } @dists;
+}
+elsif ( $ENV{MOOSE_TEST_MD} ne 'all' ) {
diag(
'Picking 200 random dependents to test. Set MOOSE_TEST_MD=all to test all dependents'
);