Commit | Line | Data |
---|---|---|
2349aeea | 1 | package TestApp::Controller::Action::Chained::Auto::Foo; |
2 | use warnings; | |
3 | use strict; | |
4 | ||
5 | use base qw( Catalyst::Controller ); | |
6 | ||
7 | # | |
8 | # Test chain reaction if auto action returns 1. | |
9 | # | |
10 | sub auto : Private { 1 } | |
11 | ||
12 | sub fooend : Chained('.') Args(1) { } | |
13 | ||
14 | sub crossend : Chained('/action/chained/auto/bar/crossloose') Args(1) { } | |
15 | ||
16 | 1; |