q{... and My::Class5->meta() still does Role::Foo} );
}
+SKIP:
+{
+ skip
+ 'These tests will fail until Moose::Meta::Class->_fix_metaclass_incompatibility is much smarter.',
+ 2;
+
{
package My::Class6;
use Moose;
ok( My::Class6->meta()->meta()->does_role('Role::Foo'),
q{... and My::Class6->meta() does Role::Foo because it extends My::Class} );
}
+}
# This is the hack needed to work around the
# _fix_metaclass_incompatibility problem. You must call extends()