18 has foo => (is => 'ro');
26 { our $TODO; local $TODO = "role accessors don't satisfy other role requires";
27 ::lives_ok { with 'Foo' } 'requirements are satisfied properly';
37 has bar => (is => 'ro');
46 has baz => (is => 'ro');
53 { our $TODO; local $TODO = "role accessors don't satisfy other role requires";
54 ::lives_ok { with qw(Bar Baz) } 'requirements are satisfied properly';