[catagits/Catalyst-Runtime.git] / t / lib / TestAppMVCWarnings.pm

package TestAppMVCWarnings;
use Moose;
extends 'Catalyst';
use Catalyst;

our @log_messages;

__PACKAGE__->config( name => 'TestAppMVCWarnings', root => '/some/dir', default_view => "DoesNotExist" );

__PACKAGE__->log(TestAppMVCWarnings::Log->new);

__PACKAGE__->setup;

package TestAppMVCWarnings::Log;
use Moose;
extends q/Catalyst::Log/;

sub warn { push(@TestAppMVCWarnings::log_messages, @_[1..$#_]); }

1;
Commit	Line	Data
9e981d5f	1	package TestAppMVCWarnings;
	2	use Moose;
	3	extends 'Catalyst';
	4	use Catalyst;
	5
	6	our @log_messages;
	7
	8	__PACKAGE__->config( name => 'TestAppMVCWarnings', root => '/some/dir', default_view => "DoesNotExist" );
	9
	10	__PACKAGE__->log(TestAppMVCWarnings::Log->new);
	11
	12	__PACKAGE__->setup;
	13
	14	package TestAppMVCWarnings::Log;
	15	use Moose;
	16	extends q/Catalyst::Log/;
	17
	18	sub warn { push(@TestAppMVCWarnings::log_messages, @_[1..$#_]); }
	19
	20	1;