Commit | Line | Data |
1b1636b5 |
1 | package TestApp::Controller::Action::TestRelative; |
01b57049 |
2 | |
3 | use strict; |
4 | use base 'TestApp::Controller::Action'; |
5 | |
1b1636b5 |
6 | __PACKAGE__->config( |
7 | path => 'action/relative' |
8 | ); |
9 | |
01b57049 |
10 | sub relative : Local { |
11 | my ( $self, $c ) = @_; |
12 | $c->forward('/action/forward/one'); |
13 | } |
14 | |
15 | sub relative_two : Local { |
16 | my ( $self, $c ) = @_; |
17 | $c->forward( 'TestApp::Controller::Action::Forward', 'one' ); |
18 | } |
19 | |
2f381252 |
20 | sub relative_go : Local { |
21 | my ( $self, $c ) = @_; |
22 | $c->go('/action/go/one'); |
23 | } |
24 | |
25 | sub relative_go_two : Local { |
26 | my ( $self, $c ) = @_; |
27 | $c->go( 'TestApp::Controller::Action::Go', 'one' ); |
28 | } |
ae0e35ee |
29 | |
30 | sub relative_visit : Local { |
31 | my ( $self, $c ) = @_; |
32 | $c->visit('/action/visit/one'); |
33 | } |
34 | |
35 | sub relative_visit_two : Local { |
36 | my ( $self, $c ) = @_; |
37 | $c->visit( 'TestApp::Controller::Action::Visit', 'one' ); |
38 | } |
39 | |
01b57049 |
40 | 1; |