1 package Catalyst::Plugin::Test::Plugin;
5 use base qw/Catalyst::Base Class::Data::Inheritable/;
7 __PACKAGE__->mk_classdata('ran_setup');
18 # Note: This use of NEXT is deliberately left here to ensure back
19 # compat, as NEXT always used to be loaded, but is now replaced
20 # by Class::C3::Adopt::NEXT.
21 my $c = $class->NEXT::prepare(@_);
22 $c->response->header( 'X-Catalyst-Plugin-Setup' => $c->ran_setup );