\r
use strict;\r
use Catalyst;\r
+use FindBin;\r
\r
our $VERSION = '0.01';\r
\r
TestApp->config(\r
name => 'TestApp',\r
+ debug => 1,\r
);\r
\r
my @plugins = qw/Static::Simple/;\r
\r
# load the SubRequest plugin if available\r
-eval { require Catalyst::Plugin::SubRequest; };\r
+eval { \r
+ require Catalyst::Plugin::SubRequest; \r
+ die unless Catalyst::Plugin::SubRequest->VERSION ge '0.08';\r
+};\r
push @plugins, 'SubRequest' unless ($@);\r
\r
TestApp->setup( @plugins );\r
return [ $c->config->{root} . '/incpath' ];\r
}\r
\r
-sub default : Private {\r
- my ( $self, $c ) = @_;\r
- \r
- $c->res->output( 'default' );\r
-}\r
-\r
-sub subtest : Local {\r
- my ( $self, $c ) = @_;\r
-\r
- $c->res->output( $c->subreq('/subtest2') );\r
-}\r
-\r
-sub subtest2 : Local {\r
- my ( $self, $c ) = @_;\r
- \r
- $c->res->output( 'subtest2 ok' );\r
-}\r
-\r
1;\r