[gitmo/Moo.git] / t / compose-non-role.t

use strictures 1;
use Test::More;
use Test::Fatal;

$INC{'MyRole.pm'} = __FILE__;

{
  package MyClass;
  use Moo;
  ::like(::exception { with 'MyRole'; }, qr/MyRole is not a Moo::Role/,
    'error when composing non-role package');
}

done_testing;
Commit	Line	Data
c2afd039	1	use strictures 1;
	2	use Test::More;
	3	use Test::Fatal;
	4
	5	$INC{'MyRole.pm'} = __FILE__;
	6
	7	{
	8	package MyClass;
	9	use Moo;
	10	::like(::exception { with 'MyRole'; }, qr/MyRole is not a Moo::Role/,
	11	'error when composing non-role package');
	12	}
	13
	14	done_testing;