[catagits/Catalyst-Runtime.git] / t / lib / TestAppMatchSingleArg / Controller / Root.pm

package TestAppMatchSingleArg::Controller::Root;

use strict;
use warnings;
use base 'Catalyst::Controller';

__PACKAGE__->config->{namespace} = '';

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

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

1;
Commit	Line	Data
9dac01c7	1	package TestAppMatchSingleArg::Controller::Root;
	2
	3	use strict;
	4	use warnings;
	5	use base 'Catalyst::Controller';
	6
	7	__PACKAGE__->config->{namespace} = '';
	8
	9	sub match_single : Path Args(1) {
	10	my ($self, $c) = @_;
	11	$c->res->body('Path Args(1)');
	12	}
	13
	14	sub match_other : Path {
	15	my ($self, $c) = @_;
	16	$c->res->body('Path');
	17	}
	18
	19	1;