File Coverage

blib/lib/App/GHPT/Wrapper/OurMoose/Role.pm
Criterion Covered Total %
statement 24 24 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod n/a
total 31 31 100.0


line stmt bran cond sub pod time code
1              
2             use App::GHPT::Wrapper::Ourperl;
3 1     1   27756  
  1         2  
  1         6  
4             our $VERSION = '2.000000';
5              
6             use Import::Into;
7 1     1   4854 use Moose::Exporter;
  1         2  
  1         22  
8 1     1   5 use Moose::Role ();
  1         9  
  1         11  
9 1     1   43 use MooseX::SemiAffordanceAccessor ();
  1         2  
  1         27  
10 1     1   417 use namespace::autoclean ();
  1         6628  
  1         27  
11 1     1   6  
  1         2  
  1         137  
12             my ($import) = Moose::Exporter->setup_import_methods(
13             install => [ 'unimport', 'init_meta' ],
14             also => ['Moose::Role'],
15             );
16              
17             my $for_role = caller();
18              
19 2     2   13 $import->( undef, { into => $for_role } );
20             MooseX::SemiAffordanceAccessor->import( { into => $for_role } );
21 2         316  
22 2         8900 my $caller_level = 1;
23             App::GHPT::Wrapper::Ourperl->import::into($caller_level);
24 2         8169 namespace::autoclean->import::into($caller_level);
25 2         23 }
26 2         9202  
27             1;