[catagits/Catalyst-Devel.git] / t / lib / MyTestHelper.pm

package MyTestHelper;
use base qw/Catalyst::Helper/;

sub example_render {
    my ($self, $fn, $vars) = @_;
    $self->render_file('example1', $fn, $vars);
}

1;

__DATA__
__example1__
foobar[% test_var %]
__example2__
bazquux
Commit	Line	Data
7025ed89	1	package MyTestHelper;
	2	use base qw/Catalyst::Helper/;
	3
	4	sub example_render {
	5	my ($self, $fn, $vars) = @_;
	6	$self->render_file('example1', $fn, $vars);
	7	}
	8
	9	1;
	10
	11	__DATA__
	12	__example1__
	13	foobar[% test_var %]
	14	__example2__
	15	bazquux