t/04load_all.t


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

use strict;
use warnings;
use Test::More ();

Test::More::plan('no_plan');

use Module::Pluggable::Object;

my $finder = Module::Pluggable::Object->new(
               search_path => [ 'Reaction' ],
             );

foreach my $class (grep !/\.ToDo/,
                   sort do { local @INC = ('lib'); $finder->plugins }) {
  Test::More::use_ok($class);
}