10 use Mouse::Meta::Role;
17 my $meta = Mouse::Meta::Role->initialize($CALLER);
22 confess "Role does not currently support 'extends'";
40 $caller->meta->add_attribute($name => \@opts);
53 return \&Scalar::Util::blessed;
56 return \&Carp::confess;
60 my $exporter = Sub::Exporter::build_exporter({
62 groups => { default => [':all'] },
78 for my $keyword (keys %exports) {
79 next if $keyword eq 'meta'; # we don't delete this one
80 delete ${ $caller . '::' }{$keyword};