[catagits/Catalyst-Action-REST.git] / t / lib / Test / Serialize / View / Simple.pm

package Test::Serialize::View::Simple;

use base qw/Catalyst::View/;

sub process {
	my ($self, $c) = @_;
	
    $c->res->body("I am a simple view");
	return 1;
}

1;
Commit	Line	Data
9a76221e	1	package Test::Serialize::View::Simple;
	2
	3	use base qw/Catalyst::View/;
	4
	5	sub process {
	6	my ($self, $c) = @_;
	7
	8	$c->res->body("I am a simple view");
	9	return 1;
	10	}
	11
	12	1;