[catagits/Catalyst-Action-REST.git] / t / lib / Test / Catalyst / Action / REST / Controller / REST.pm

package Test::Catalyst::Action::REST::Controller::REST;

use strict;
use warnings;

use base 'Catalyst::Controller::REST';

sub test : Local {
  my ($self, $c) = @_;
  $self->status_ok($c, entity => { test => 'worked', data => $c->req->data });
}

1;
Commit	Line	Data
0ba73721	1	package Test::Catalyst::Action::REST::Controller::REST;
	2
	3	use strict;
	4	use warnings;
	5
	6	use base 'Catalyst::Controller::REST';
	7
	8	sub test : Local {
	9	my ($self, $c) = @_;
	10	$self->status_ok($c, entity => { test => 'worked', data => $c->req->data });
	11	}
	12
	13	1;