File Coverage

blib/lib/MooseX/Role/WithOverloading/Meta/Role.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package MooseX::Role::WithOverloading::Meta::Role;
2              
3             our $VERSION = '0.17';
4              
5 9     9   6283 use Moose 0.94 ();
  9         267  
  9         233  
6 9     9   45 use Moose::Role;
  9         16  
  9         57  
7 9     9   50454 use aliased 'MooseX::Role::WithOverloading::Meta::Role::Composite', 'CompositionRole';
  9         21  
  9         68  
8 9     9   710 use namespace::autoclean;
  9         18  
  9         37  
9              
10             around composition_class_roles => sub {
11             my ($orig, $self) = @_;
12             return $self->$orig, CompositionRole;
13             };
14              
15             1;