Commit | Line | Data |
e28a6876 |
1 | package TestApp::Controller::Action::Chained::Auto; |
2 | use warnings; |
3 | use strict; |
4 | |
5 | use base qw( Catalyst::Controller ); |
6 | |
7 | # |
8 | # Provided for sub-auto tests. This just always returns true. |
9 | # |
10 | sub auto : Private { 1 } |
11 | |
12 | # |
13 | # Simple chains with auto actions returning 1 and 0 |
14 | # |
15 | sub foo : Chained PathPart('chained/autochain1') CaptureArgs(1) { } |
16 | sub bar : Chained PathPart('chained/autochain2') CaptureArgs(1) { } |
17 | |
18 | # |
19 | # Detaching out of an auto action. |
20 | # |
21 | sub dt1 : Chained PathPart('chained/auto_detach') CaptureArgs(1) { } |
22 | |
23 | # |
24 | # Forwarding out of an auto action. |
25 | # |
26 | sub fw1 : Chained PathPart('chained/auto_forward') CaptureArgs(1) { } |
27 | |
28 | # |
29 | # Target for dispatch and forward tests. |
30 | # |
31 | sub fw3 : Private { } |
32 | |
33 | 1; |