use Class::MOP::load_class instead of plain eval - if the module is not found, die with message (close RT#59776) master

1 files changed, 18 insertions, 0 deletions

diff --git a/t/06_die_with_inexistant_class.t b/t/06_die_with_inexistant_class.t
new file mode 100644
index 0000000..fcf600b
--- /dev/null
+++ b/t/06_die_with_inexistant_class.t
@@ -0,0 +1,18 @@
+use strict;
+use warnings;
+use Test::More tests => 2;
+use Test::Exception;
+
+BEGIN {
+	package My::Factory;
+	use MooseX::AbstractFactory;
+	use Moose;
+}
+
+dies_ok {
+	my $imp = My::Factory->create(
+    	'FooBar', {}
+	);
+} "Factory->new() die";
+
+like $@, qr/Can't locate My\/Factory\/FooBar.pm/;