X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FGetopt%2FStrict.pm;h=3c9ef39a889f68215ef15db6145f958e1914f154;hb=5b582f22bdea267ebe6bd70c6cb664fdac30d20e;hp=f845d694f029782a318c0743c4edd67cb222e9fb;hpb=c6c1f6285c8ad44ddb2375289ea449705bb467ad;p=gitmo%2FMooseX-Getopt.git

diff --git a/lib/MooseX/Getopt/Strict.pm b/lib/MooseX/Getopt/Strict.pm
index f845d69..3c9ef39 100644
--- a/lib/MooseX/Getopt/Strict.pm
+++ b/lib/MooseX/Getopt/Strict.pm
@@ -6,9 +6,10 @@ with 'MooseX::Getopt';
 
 around '_compute_getopt_attrs' => sub {
     my $next = shift;
-    my ( $class, @args ) = @_;
-    grep { 
-        $_->isa("MooseX::Getopt::Meta::Attribute") 
+    my ($class, @args) = @_;
+    
+    return grep { 
+        $_->does('MooseX::Getopt::Meta::Attribute::Trait') 
     } $class->$next(@args);
 };