added tests for forward to global private actions.

[catagits/Catalyst-Runtime.git] / t / lib / TestApp.pm

diff --git a/t/lib/TestApp.pm b/t/lib/TestApp.pm
index e7f2ae2..eae7b07 100644 (file)
--- a/t/lib/TestApp.pm
+++ b/t/lib/TestApp.pm
@@ -14,6 +14,11 @@ TestApp->setup;
 
 #sub execute { return shift->NEXT::execute(@_); } # does not work, bug?
 
+sub main_action : Private {
+    my ( $self, $c ) = @_;
+    $c->forward('TestApp::View::Dump::Request');
+}
+
 sub execute {
     my $c       = shift;
     my $class   = ref( $c->component($_[0]) ) || $_[0];