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 (without a use NEXT)
19 # to ensure back compat, as NEXT always used to be loaded, but
20 # is now replaced by Class::C3::Adopt::NEXT.
21 my $c = $class->NEXT::prepare(@_);
22 $c->response->header( 'X-Catalyst-Plugin-Setup' => $c->ran_setup );