X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestAppPathBug.pm;h=7ae5f5bf43b2218068818b26e618355f414d40d7;hb=05f2584c0bb421a582148f1c511495bfd238a3de;hp=74a2f279ae92d1a941ced51c15bfc4e225f60e18;hpb=f15ff320402420ecfdf793cf63671da0c104bf6f;p=catagits%2FCatalyst-Runtime.git diff --git a/t/lib/TestAppPathBug.pm b/t/lib/TestAppPathBug.pm index 74a2f27..7ae5f5b 100644 --- a/t/lib/TestAppPathBug.pm +++ b/t/lib/TestAppPathBug.pm @@ -1,9 +1,6 @@ -use strict; -use warnings; - package TestAppPathBug; -use strict; -use warnings; +use Moose; +extends 'Catalyst'; use Catalyst; our $VERSION = '0.01'; @@ -13,15 +10,9 @@ __PACKAGE__->config( name => 'TestAppPathBug', root => '/some/dir' ); __PACKAGE__->log(TestAppPathBug::Log->new); __PACKAGE__->setup; -sub foo : Path { - my ( $self, $c ) = @_; - $c->res->body( 'This is the foo method.' ); -} - package TestAppPathBug::Log; -use strict; -use warnings; -use base qw/Catalyst::Log/; +use Moose; +extends 'Catalyst::Log'; sub warn {}