X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flib%2FTestApp.pm;fp=t%2Flib%2FTestApp.pm;h=3d50a73f454f052b7b9f031a15d7557298bbf9e0;hp=c2545db9006059f25c5fe31a54fb83c9f37d7bb6;hb=88e5a8b0c4d28e46b8ba6b6b9567063e57af9063;hpb=9868e0a0023cc8b598d60f150ea367e0056a65f3 diff --git a/t/lib/TestApp.pm b/t/lib/TestApp.pm index c2545db..3d50a73 100644 --- a/t/lib/TestApp.pm +++ b/t/lib/TestApp.pm @@ -2,8 +2,8 @@ package TestApp; use strict; use Catalyst qw/ Test::MangleDollarUnderScore - Test::Errors - Test::Headers + Test::Errors + Test::Headers Test::Plugin Test::Inline +TestApp::Plugin::FullyQualified @@ -42,10 +42,10 @@ has 'my_greeting_obj_lazy' => ( our $VERSION = '0.01'; -TestApp->config( - name => 'TestApp', - root => '/some/dir', - use_request_uri_for_path => 1, +TestApp->config( + name => 'TestApp', + root => '/some/dir', + use_request_uri_for_path => 1, 'Controller::Action::Action' => { action_args => { action_action_nine => { another_extra_arg => 13 } @@ -115,9 +115,9 @@ sub execute { # useful info if something crashes during a test sub finalize_error { my $c = shift; - + $c->next::method(@_); - + $c->res->status(500); $c->res->body( 'FATAL ERROR: ' . join( ', ', @{ $c->error } ) ); } @@ -142,7 +142,7 @@ sub finalize_headers { return $c->maybe::next::method(@_); } -# Make sure we can load Inline plugins. +# Make sure we can load Inline plugins. package Catalyst::Plugin::Test::Inline; use Moose;