t/lib/TestAppWithMeta/Controller/Root.pm

   1 package TestAppWithMeta::Controller::Root;
   2 use Moose;
   3 use namespace::clean -except => 'meta';
   4
   5 BEGIN { extends 'Catalyst::Controller' }
   6
   7 __PACKAGE__->config( namespace => '' );
   8
   9 no warnings 'redefine';
  10 sub meta { 'fnar' }
  11 use warnings 'redefine';
  12
  13 sub default : Private {
  14     my ($self, $c) = @_;
  15     $c->res->body($self->meta);
  16 }
  17
  18 1;
  19