use Test::More tests => 9; use Test::Deep; use Test::NoWarnings; use Module::CPANTS::Analyse; eval { my $an=Module::CPANTS::Analyse->new(); }; like($@, qr/need a dist/, 'exception'); my $a=Module::CPANTS::Analyse->new({dist => 'dummy'}); { my @plugins=$a->plugins; is(@plugins,15,'number of plugins'); } my $plugins=$a->mck->generators; is(shift(@$plugins),'Module::CPANTS::Kwalitee::Files','plugin order 1 Files'); is(shift(@$plugins),'Module::CPANTS::Kwalitee::Distname','plugin order 2 Distname'); is(shift(@$plugins),'Module::CPANTS::Kwalitee::MetaYML','plugin order 3 MetaYML'); is(shift(@$plugins),'Module::CPANTS::Kwalitee::FindModules','plugin order 4 FindModules'); is(pop(@$plugins),'Module::CPANTS::Kwalitee::CpantsErrors','plugin order last CpantsErrors'); cmp_deeply($plugins,bag( qw( Module::CPANTS::Kwalitee::Pod Module::CPANTS::Kwalitee::Prereq Module::CPANTS::Kwalitee::Uses Module::CPANTS::Kwalitee::BrokenInstaller Module::CPANTS::Kwalitee::Manifest Module::CPANTS::Kwalitee::License Module::CPANTS::Kwalitee::NeedsCompiler Module::CPANTS::Kwalitee::Repackageable Module::CPANTS::Kwalitee::Version Module::CPANTS::Kwalitee::Distros )),'plugin the rest');