[catagits/CatalystX-Declare.git] / t / lib / TestApp / Controller / Foo.pm

use CatalystX::Declarative;

controller TestApp::Controller::Foo {

    has bar => (is => 'rw');

    method baz { }

    under '/', action base, as '';

    action root under base as '' is final { }

    action list under base is final { }

    under base, as 'id', action object ($id) { }

    action view under object is final { $ctx->res->body('Hello World!') }

    action edit under object is final { }

    action tag (@tags) under object is final { }
}
Commit	Line	Data
918fb36e	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