X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flib%2FTestAppPathBug.pm;h=74a2f279ae92d1a941ced51c15bfc4e225f60e18;hp=04582a7f7a442f5e4cee80847884e1580bf4013b;hb=82010ea176741c7a4f2baf3f6f27377b1d9f6b15;hpb=346a21ea173251414e3626343c9d195f831e5595

diff --git a/t/lib/TestAppPathBug.pm b/t/lib/TestAppPathBug.pm
index 04582a7..74a2f27 100644
--- a/t/lib/TestAppPathBug.pm
+++ b/t/lib/TestAppPathBug.pm
@@ -2,13 +2,27 @@ use strict;
 use warnings;
 
 package TestAppPathBug;
-
+use strict;
+use warnings;
 use Catalyst;
 
 our $VERSION = '0.01';
 
 __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/;
+
+sub warn {}
+
 1;