[gitmo/Moo.git] / t / load_module_error.t

use strictures;

package load_module_error;

use Test::More;

use lib 't/lib';

eval "use sub_class;";

ok $@, "got a crash";
unlike $@, qr/Unknown error/, "it came with a useful error message";

done_testing;
Commit	Line	Data
49d332df	1	use strictures;
	2
	3	package load_module_error;
	4
	5	use Test::More;
	6
	7	use lib 't/lib';
	8
	9	eval "use sub_class;";
	10
	11	ok $@, "got a crash";
	12	unlike $@, qr/Unknown error/, "it came with a useful error message";
	13
	14	done_testing;