+++ /dev/null
-package Catalyst::Plugin::Test::Plugin;
-
-use strict;
-
-use base qw/Catalyst::Base Class::Data::Inheritable/;
-
- __PACKAGE__->mk_classdata('ran_setup');
-
-sub setup {
- my $c = shift;
- $c->ran_setup('1');
-}
-
-sub prepare {
-
- my $class = shift;
-
- my $c = $class->NEXT::prepare(@_);
- $c->response->header( 'X-Catalyst-Plugin-Setup' => $c->ran_setup );
-
- return $c;
-
-}
-
-sub end : Private {
- my ($self,$c) = @_;
-}
-
-1;