The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
package # Hide from the indexer for now until docs are added later.
    MooseX::BuildArgs::Meta::ToClass;
use Moose::Role;

around apply => sub {
    my $orig      = shift;
    my $self      = shift;
    my $from_role = shift;
    my $to_class  = shift;

    Moose::Util::MetaRole::apply_base_class_roles(
        for   => $to_class,
        roles => ['MooseX::BuildArgs::Meta::Object'],
    );

    return $self->$orig( $from_role, $to_class );
};

1;