[catagits/Catalyst-Plugin-ConfigLoader-Environment.git] / t / lib / TestApp / View / TestView.pm

#!/usr/bin/perl
# TestView.pm 
# Copyright (c) 2006 Jonathan Rockway <jrockway@cpan.org>

package TestApp::View::TestView;
use base 'Catalyst::View';

sub AUTOLOAD {
    our $AUTOLOAD =~ s{.*::}{};
    return $_[0]->{$AUTOLOAD};
}

1;
Commit	Line	Data
0580e0f8	1	#!/usr/bin/perl
	2	# TestView.pm
	3	# Copyright (c) 2006 Jonathan Rockway <jrockway@cpan.org>
	4
	5	package TestApp::View::TestView;
	6	use base 'Catalyst::View';
	7
	8	sub AUTOLOAD {
	9	our $AUTOLOAD =~ s{.*::}{};
	10	return $_[0]->{$AUTOLOAD};
	11	}
	12
	13	1;