class_of _reconcile_role_differences
Shawn M Moore [Sat, 28 Mar 2009 20:36:31 +0000 (16:36 -0400)]
lib/Moose/Meta/Class.pm

index 8a7de83..73256ec 100644 (file)
@@ -462,7 +462,7 @@ sub _all_roles_until {
 sub _reconcile_role_differences {
     my ($self, $super_meta) = @_;
 
-    my $self_meta = $self->meta;
+    my $self_meta = Class::MOP::class_of($self);
 
     my %roles;