push a bunch of details about metaclass compat into CMOP::Object
[gitmo/Class-MOP.git] / t / 041_metaclass_incompatibility.t
index c73b01e..5b0223f 100644 (file)
@@ -216,7 +216,10 @@ isa_ok(Class::MOP::class_of('Foo::Reverse::Sub::Sub'), 'Foo::Meta::Class');
 
 # nonexistent metaclasses
 
-Class::MOP::Class->create('Weird::Meta::Method::Destructor');
+Class::MOP::Class->create(
+    'Weird::Meta::Method::Destructor',
+    superclasses => ['Class::MOP::Method'],
+);
 
 lives_ok {
     Class::MOP::Class->create(