ignore metaclass in superclasses if it isn't a Class::MOP::Class but still found...
Yuval Kogman [Thu, 24 Jul 2008 13:58:59 +0000 (13:58 +0000)]
lib/Moose/Meta/Class.pm

index 92a84b1..6535a68 100644 (file)
@@ -282,6 +282,7 @@ sub _fix_metaclass_incompatability {
     foreach my $super (@superclasses) {
         # don't bother if it does not have a meta.
         next unless $super->can('meta');
+        next unless $super->meta->isa("Class::MOP::Class");
         # get the name, make sure we take
         # immutable classes into account
         my $super_meta_name = ($super->meta->is_immutable