[gitmo/Mouse.git] / t / 050_metaclasses / 041_moose_nonmoose_moose_chain_init_meta.t

use strict;
# This is automatically generated by author/import-moose-test.pl.
# DO NOT EDIT THIS FILE. ANY CHANGES WILL BE LOST!!!
use t::lib::MooseCompat;
use warnings;
{
    package ParentClass;
    use Mouse;
}
{
    package SomeClass;
    use base 'ParentClass';
}
{
    package SubClassUseBase;
    use base qw/SomeClass/;
    use Mouse;
}

use Test::More;
use Test::Exception;

lives_ok {
    Mouse->init_meta(for_class => 'SomeClass');
} 'Mouse class => use base => Mouse Class, then Mouse->init_meta on middle class ok';

done_testing;
Commit	Line	Data
6217087a	1	use strict;
	2	# This is automatically generated by author/import-moose-test.pl.
	3	# DO NOT EDIT THIS FILE. ANY CHANGES WILL BE LOST!!!
	4	use t::lib::MooseCompat;
	5	use warnings;
	6	{
	7	package ParentClass;
	8	use Mouse;
	9	}
	10	{
	11	package SomeClass;
	12	use base 'ParentClass';
	13	}
	14	{
	15	package SubClassUseBase;
	16	use base qw/SomeClass/;
	17	use Mouse;
	18	}
	19
	20	use Test::More;
	21	use Test::Exception;
	22
	23	lives_ok {
	24	Mouse->init_meta(for_class => 'SomeClass');
	25	} 'Mouse class => use base => Mouse Class, then Mouse->init_meta on middle class ok';
	26
	27	done_testing;