r12983@zaphod: kd | 2008-04-28 18:10:27 +1000

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

diff --git a/t/lib/TestApp/Controller/Action/TestRelative.pm b/t/lib/TestApp/Controller/Action/TestRelative.pm
index 951345e..2efe3f1 100644 (file)
--- a/t/lib/TestApp/Controller/Action/TestRelative.pm
+++ b/t/lib/TestApp/Controller/Action/TestRelative.pm
@@ -17,4 +17,13 @@ sub relative_two : Local {
     $c->forward( 'TestApp::Controller::Action::Forward', 'one' );
 }
 
+sub relative_go : Local {
+    my ( $self, $c ) = @_;
+    $c->go('/action/go/one');
+}
+
+sub relative_go_two : Local {
+    my ( $self, $c ) = @_;
+    $c->go( 'TestApp::Controller::Action::Go', 'one' );
+}
 1;