14 sub new { bless { count => 1 }, shift }
15 sub count { shift->{count}++ }
21 my $logger = Class::MOP::Class->create_anon_class(
27 if ($_[1] =~ /plugin method is deprecated/) {
31 die "Caught unexpected warning: " . $_[1];
35 PluginTestApp->log($logger);
37 use Catalyst::Test qw/PluginTestApp/;
39 ok( get("/compile_time_plugins"), "get ok" );
40 is( $warnings, 0, 'no warnings' );
41 # FIXME - Run time plugin support is insane, and should be removed
43 ok( get("/run_time_plugins"), "get ok" );
45 local $ENV{CATALYST_DEBUG} = 0;
47 is( $warnings, 1, '1 warning' );
51 Catalyst::Plugin::Test::Errors
52 Catalyst::Plugin::Test::Headers
53 Catalyst::Plugin::Test::Inline
54 Catalyst::Plugin::Test::MangleDollarUnderScore
55 Catalyst::Plugin::Test::Plugin
56 Catalyst::Plugin::Unicode::Encoding
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';