Fix warnings in new Catalyst
[catagits/Catalyst-Plugin-Static-Simple.git] / t / lib / TestApp.pm
CommitLineData
e37ad815 1package TestApp;\r
2\r
3use strict;\r
4use Catalyst;\r
ab02ca0d 5use FindBin;\r
e37ad815 6\r
7our $VERSION = '0.01';\r
8\r
9TestApp->config(\r
10 name => 'TestApp',\r
ab02ca0d 11 debug => 1,\r
e37ad815 12);\r
13\r
8cc672a2 14my @plugins = qw/Static::Simple/;\r
82239955 15\r
16# load the SubRequest plugin if available\r
d62f3c98 17eval { \r
18 require Catalyst::Plugin::SubRequest; \r
19 die unless Catalyst::Plugin::SubRequest->VERSION ge '0.08';\r
20};\r
82239955 21push @plugins, 'SubRequest' unless ($@);\r
22\r
23TestApp->setup( @plugins );\r
e37ad815 24\r
25sub incpath_generator {\r
26 my $c = shift;\r
27 \r
28 return [ $c->config->{root} . '/incpath' ];\r
29}\r
30\r
e37ad815 311;\r