[gitmo/MooseX-Storage.git] / t / 200_combined_in_roles.t

#/usr/bin/env perl
use strict;
use warnings;
use Test::More tests => 1;
use Test::Exception;

{
    package ClassOne;
    use Moose::Role;
    use MooseX::Storage;
}
{
    package ClassTwo;
    use Moose::Role;
    use MooseX::Storage;
}

lives_ok {
    package CombineClasses;
    use Moose;
    with qw/ClassOne ClassTwo/;
} 'Can include two roles which both use MooseX::Storage';
Commit	Line	Data
f9143059	1	#/usr/bin/env perl
	2	use strict;
	3	use warnings;
	4	use Test::More tests => 1;
	5	use Test::Exception;
	6
	7	{
	8	package ClassOne;
	9	use Moose::Role;
	10	use MooseX::Storage;
	11	}
	12	{
	13	package ClassTwo;
	14	use Moose::Role;
	15	use MooseX::Storage;
	16	}
	17
	18	lives_ok {
	19	package CombineClasses;
	20	use Moose;
	21	with qw/ClassOne ClassTwo/;
	22	} 'Can include two roles which both use MooseX::Storage';
	23