view release on metacpan or  search on metacpan

lib/App/GHPT/Wrapper/OurMoose/Role.pm  view on Meta::CPAN

package App::GHPT::Wrapper::OurMoose::Role;

use App::GHPT::Wrapper::Ourperl;

our $VERSION = '2.000001';

use Import::Into;
use Moose::Exporter;
use Moose::Role                    ();
use MooseX::SemiAffordanceAccessor ();
use namespace::autoclean           ();

my ($import) = Moose::Exporter->setup_import_methods(
    install => [ 'unimport', 'init_meta' ],
    also    => ['Moose::Role'],
);

sub import {
    my $for_role = caller();

    $import->( undef, { into => $for_role } );
    MooseX::SemiAffordanceAccessor->import( { into => $for_role } );

    my $caller_level = 1;
    App::GHPT::Wrapper::Ourperl->import::into($caller_level);
    namespace::autoclean->import::into($caller_level);
}

1;