This is also toast. We need a much better error, but this can go

[catagits/Catalyst-Runtime.git] / t / lib / TestAppPathBug / Controller / Root.pm

diff --git a/t/lib/TestAppPathBug/Controller/Root.pm b/t/lib/TestAppPathBug/Controller/Root.pm
new file mode 100644 (file)
index 0000000..8630dad
--- /dev/null
+++ b/t/lib/TestAppPathBug/Controller/Root.pm
@@ -0,0 +1,14 @@
+package TestAppPathBug::Controller::Root;
+use strict;
+use warnings;
+use base qw/Catalyst::Controller/;
+
+__PACKAGE__->config(namespace => '');
+
+sub foo : Path {
+    my ( $self, $c ) = @_;
+    $c->res->body( 'This is the foo method.' );
+}
+
+1;
+