t/lib/TestAppDoubleAutoBug/Controller/Root.pm

   1 package TestAppDoubleAutoBug::Controller::Root;
   2
   3 use base 'Catalyst::Controller';
   4
   5 __PACKAGE__->config->{namespace} = '';
   6
   7 sub auto : Private {
   8     my ( $self, $c ) = @_;
   9     ++$c->stash->{auto_count};
  10     return 1;
  11 }
  12
  13 sub default : Private {
  14     my ( $self, $c ) = @_;
  15     $c->res->body( sprintf 'default, auto=%d', $c->stash->{auto_count} );
  16 }
  17
  18 sub end : Private {
  19     my ($self,$c) = @_;
  20 }
  21
  22 1;