[catagits/Catalyst-Runtime.git] / t / lib / TestAppIndexDefault / Controller / Default.pm

package TestAppIndexDefault::Controller::Default;

use base 'Catalyst::Controller';

sub default : Private {
    my ($self, $c) = @_;
    $c->res->body('default_default');
}

sub path_one_arg : Path('/default') Args(1) {
    my ($self, $c) = @_;
    $c->res->body('default_path_one_arg');
}

1;
Commit	Line	Data
db9f3d4c	1	package TestAppIndexDefault::Controller::Default;
	2
	3	use base 'Catalyst::Controller';
	4
	5	sub default : Private {
	6	my ($self, $c) = @_;
	7	$c->res->body('default_default');
	8	}
	9
	10	sub path_one_arg : Path('/default') Args(1) {
	11	my ($self, $c) = @_;
	12	$c->res->body('default_path_one_arg');
	13	}
	14
	15	1;