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

package Test::Serialize::View::Simple;
use Moose;
use namespace::autoclean;

extends 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;
930013e6	2	use Moose;
930013e6	3	use namespace::autoclean;
9a76221e	4
930013e6	5	extends qw/Catalyst::View/;
9a76221e	6
9a76221e	7	sub process {
21d3f6ae	8	my ($self, $c) = @_;
21d3f6ae	9
9a76221e	10	$c->res->body("I am a simple view");
21d3f6ae	11	return 1;
9a76221e	12	}
	13
	14	1;