new test suit
[catagits/Catalyst-Runtime.git] / t / lib / TestApp / Controller / Action / Relative.pm
1 package TestApp::Controller::Action::Relative;
2
3 use strict;
4 use base 'TestApp::Controller::Action';
5
6 sub one : Action Relative {
7     my ( $self, $c ) = @_;
8     $c->forward('TestApp::View::Dump::Request');
9 }
10
11 sub two : Action Local {
12     my ( $self, $c ) = @_;
13     $c->forward('TestApp::View::Dump::Request');
14 }
15
16 sub three : Action Path('three') {
17     my ( $self, $c ) = @_;
18     $c->forward('TestApp::View::Dump::Request');
19 }
20
21 sub four : Action Path('four/five/six') {
22     my ( $self, $c ) = @_;
23     $c->forward('TestApp::View::Dump::Request');
24 }
25
26 1;