Will flatten the capture args in uri_for

[catagits/Catalyst-Runtime.git] / t / lib / TestApp / Controller / Action / Chained / Auto / Forward.pm

diff --git a/t/lib/TestApp/Controller/Action/Chained/Auto/Forward.pm b/t/lib/TestApp/Controller/Action/Chained/Auto/Forward.pm
new file mode 100644 (file)
index 0000000..982439c
--- /dev/null
+++ b/t/lib/TestApp/Controller/Action/Chained/Auto/Forward.pm
@@ -0,0 +1,18 @@
+package TestApp::Controller::Action::Chained::Auto::Forward;
+use warnings;
+use strict;
+
+use base qw( Catalyst::Controller );
+
+#
+#   For testing behaviour of a forwarding auto action in a chain.
+#
+sub auto    : Private {
+    my ( $self, $c ) = @_;
+    $c->forward( '/action/chained/auto/fw3' );
+    return 1;
+}
+
+sub forwardend  : Chained('/action/chained/auto/fw1') Args(1) { }
+
+1;