exclude self from add_role

diff --git a/lib/Moo/HandleMoose.pm b/lib/Moo/HandleMoose.pm
index e63e0be..6540ec2 100644 (file)
--- a/lib/Moo/HandleMoose.pm
+++ b/lib/Moo/HandleMoose.pm
@@ -113,7 +113,8 @@ sub inject_real_metaclass_for {
     );
   }
   $meta->add_role(Class::MOP::class_of($_))
-    for do { no warnings 'once'; keys %{$Role::Tiny::APPLIED_TO{$name}} };
+    for grep $_ ne $name,
+      do { no warnings 'once'; keys %{$Role::Tiny::APPLIED_TO{$name}} };
   $DID_INJECT{$name} = 1;
   $meta;
 }