t/lib/TestApp.pm

   1 package TestApp;
   2
   3 use strict;
   4 use warnings;
   5 use Catalyst;
   6
   7 our $VERSION = '0.01';
   8
   9 TestApp->config(
  10     name => 'TestApp',
  11 );
  12
  13 TestApp->setup( qw/Scheduler/ );
  14
  15 sub default : Private {
  16     my ( $self, $c ) = @_;
  17
  18     $c->res->output( 'default' );
  19 }
  20
  21 1;
  22