# directory
use Catalyst qw/
- -Debug
+ -Debug
ConfigLoader
Static::Simple
/;
# local deployment.
__PACKAGE__->config(
- name => '[% name %]',
- # Disable deprecated behavior needed by old applications
- disable_component_resolution_regex_fallback => 1,
+ name => '[% name %]',
+ # Disable deprecated behavior needed by old applications
+ disable_component_resolution_regex_fallback => 1,
);
# Start the application
=cut
__PACKAGE__->meta->make_immutable;
+
+1;
[% startperl %]
use Catalyst::ScriptRunner;
-Catalyst::ScriptRunner->run('[% name %]','FastCGI');
+Catalyst::ScriptRunner->run('[% name %]', 'FastCGI');
1;
[% startperl %]
BEGIN {
- $ENV{CATALYST_SCRIPT_GEN} = [% scriptgen %]
+ $ENV{CATALYST_SCRIPT_GEN} = [% scriptgen %];
}
use Catalyst::ScriptRunner;
[% startperl %]
use Catalyst::ScriptRunner;
-Catalyst::ScriptRunner->run('[% name %]','Test');
+Catalyst::ScriptRunner->run('[% name %]', 'Test');
1;
ok( request('/')->is_success, 'Request should succeed' );
done_testing();
-1;
plan skip_all => 'set TEST_POD to enable this test' unless $ENV{TEST_POD};
all_pod_files_ok();
-1;
plan skip_all => 'set TEST_POD to enable this test' unless $ENV{TEST_POD};
all_pod_coverage_ok();
-1;
eval "use Test::WWW::Mechanize::Catalyst '[% name %]'";
if ($@) {
plan skip_all => 'Test::WWW::Mechanize::Catalyst required';
- exit 0;
+ exit 0;
}
ok( my $mech = Test::WWW::Mechanize::Catalyst->new, 'Created mech object' );
[% END -%]
done_testing();
-1;