> 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/