use FindBin;
use File::Spec::Functions;
-use Test::More tests => 69;
-use Test::Exception;
+use Test::More;
+use Test::Fatal;
use Class::MOP;
ok(!Class::MOP::is_class_loaded('BinaryTree'), '... the binary tree class is not loaded');
-lives_ok {
+is( exception {
Class::MOP::load_class('BinaryTree');
-} '... loaded the BinaryTree class without dying';
+}, undef, '... loaded the BinaryTree class without dying' );
ok(Class::MOP::is_class_loaded('BinaryTree'), '... the binary tree class is now loaded');
'... this should be the reverse of the original');
}
+done_testing;