X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Funit_core_methodattributes_method_metaclass_on_subclasses.t;h=8b8b659770339f428006ea18c567eece3f75951d;hp=b6f505494837cb3ae7aaa42032319a7d09737454;hb=a0b5065e3dd43fea2ca17f4f2ae7cbe1958057d4;hpb=1e34b59f3d349a225f388bd129b0aa172586a629

diff --git a/t/unit_core_methodattributes_method_metaclass_on_subclasses.t b/t/unit_core_methodattributes_method_metaclass_on_subclasses.t
index b6f5054..8b8b659 100644
--- a/t/unit_core_methodattributes_method_metaclass_on_subclasses.t
+++ b/t/unit_core_methodattributes_method_metaclass_on_subclasses.t
@@ -15,13 +15,13 @@ use Test::More;
 
     sub test {}
 }
-
+my $c = 0;
 foreach my $class (qw/ CT RT /) {
     my $class_name = 'NoAttributes::' . $class;
     my $meta = $class_name->meta;
     my $meth = $meta->find_method_by_name('test');
     {
-        local $TODO = "Known MX::MethodAttributes issue";
+        local $TODO = "Known MX::MethodAttributes issue" if $c++;
         ok $meth->can('attributes'), 'method metaclass has ->attributes method for ' . $class;;
     }
 }