From 5f97cb0153e0a07149fa82f3dd9cab093ae721e6 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Thu, 28 May 2009 20:15:10 -0500
Subject: don't check for required methods in our own class

---
 lib/MooseX/ABC/Trait/Class.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lib/MooseX/ABC/Trait/Class.pm b/lib/MooseX/ABC/Trait/Class.pm
index 735a85a..bcefd9a 100644
--- a/lib/MooseX/ABC/Trait/Class.pm
+++ b/lib/MooseX/ABC/Trait/Class.pm
@@ -15,7 +15,9 @@ has required_methods => (
 
 after _superclasses_updated => sub {
     my $self = shift;
-    for my $superclass ($self->linearized_isa) {
+    my @supers = $self->linearized_isa;
+    shift @supers;
+    for my $superclass (@supers) {
         my $super_meta = Class::MOP::class_of($superclass);
         next unless $super_meta->does_role('MooseX::ABC::Trait::Class');
         for my $method ($super_meta->required_methods) {
-- 
cgit v1.2.3