first rudimentary implementation
[catagits/CatalystX-Declare.git] / t / lib / TestApp / Controller / Foo.pm
1 use CatalystX::Declarative;
2
3 controller TestApp::Controller::Foo {
4
5     has bar => (is => 'rw');
6
7     method baz { }
8
9     under '/', action base, as '';
10
11     action root under base as '' is final { }
12
13     action list under base is final { }
14
15     under base, as 'id', action object ($id) { }
16
17     action view under object is final { $ctx->res->body('Hello World!') }
18
19     action edit under object is final { }
20
21     action tag (@tags) under object is final { }
22 }
23