1 package MooseX::UndefTolerant::ApplicationToRole;
7 my ($role, $class) = @_;
9 Moose::Util::MetaRole::apply_metaroles(
12 application_to_class => [
13 'MooseX::UndefTolerant::ApplicationToClass',
15 application_to_role => [
16 'MooseX::UndefTolerant::ApplicationToRole',
21 $self->$orig( $role, $class );