6 use Test::More tests => 24;
14 sub new { bless {}, shift }
16 sub count { $count++ }
22 my $logger = Class::MOP::Class->create_anon_class(
28 if ($_[1] =~ /plugin method is deprecated/) {
32 die "Caught unexpected warning: " . $_[1];
36 PluginTestApp->log($logger);
38 use Catalyst::Test qw/PluginTestApp/;
40 ok( get("/compile_time_plugins"), "get ok" );
41 is( $warnings, 0, 'no warnings' );
42 # FIXME - Run time plugin support is insane, and should be removed
44 ok( get("/run_time_plugins"), "get ok" );
46 local $ENV{CATALYST_DEBUG} = 0;
48 is( $warnings, 1, '1 warning' );
52 Catalyst::Plugin::Test::Errors
53 Catalyst::Plugin::Test::Headers
54 Catalyst::Plugin::Test::Inline
55 Catalyst::Plugin::Test::MangleDollarUnderScore
56 Catalyst::Plugin::Test::Plugin
57 TestApp::Plugin::AddDispatchTypes
58 TestApp::Plugin::FullyQualified
61 # Faux::Plugin is no longer reported
62 is_deeply [ TestApp->registered_plugins ], \@expected,
63 'registered_plugins() should only report the plugins for the current class';