> So I'm thinking that AFA Role::Basic goes, I could just add something like
> this: > > # Check for Role::Basic roles. > if ($type->isa('Role::Basic') > { > return $mutc{type}->( $type, { where => sub { $_->DOES($type) } > } ); > } > > It would go just before the check against the RoleName constraint. It > would of course assume that $mutc{type} was defined just like others > in _init_mutc: > > $mutc{type} = \&{ $class . '::type' > }; > > Does that seem rational? I would especially love to hear from Ovid, > if he's following this discussion. I'm following but I have a new job, a new country, a relatively new wife and a very new baby. Thus, I skim a lot of things, but I can't really dig in too deeply. Sorry 'bout that (hence, my relative lack of participation in the Perl community lately). Cheers, Ovid -- Live and work overseas - http://overseas-exile.blogspot.com/ Buy the book - http://www.oreilly.com/catalog/perlhks/ Tech blog - http://blogs.perl.org/users/ovid/ Twitter - http://twitter.com/OvidPerl/