File Coverage

blib/lib/Mo/Mouse.pm
Criterion Covered Total %
statement 19 19 100.0
branch 2 2 100.0
condition 4 7 57.1
subroutine 3 3 100.0
pod n/a
total 28 31 90.3


line stmt bran cond sub pod time code
1             package Mo::Mouse;
2             $Mo::Mouse::VERSION = '0.40';$M="Mo::";
3             $VERSION='0.40';
4 1     1   2 *{$M.'Mouse::e'}=sub{my($P,$e)=@_;$P=~s/::$//;%$e=(M=>1);require Mouse;require Mouse::Util::MetaRole;Mouse->import({into=>$P});Mouse::Util::MetaRole::apply_metaroles(for=>$P,class_metaroles=>{attribute=>['Attr::Trait']},)};BEGIN{package Attr::Trait;
  1         5  
  1         3  
  1         7  
  1         605  
  1         948  
  1         304  
5 1 100 50 1   383 $Attr::Trait::VERSION = '0.40';use Mouse::Role;around _process_options=>sub{my$orig=shift;my$c=shift;my($n,$o)=@_;$o->{is}||='rw';$o->{lazy}||=1 if defined$o->{default}or defined$o->{builder};$c->$orig(@_)};$INC{'Attr/Trait.pm'}=1}
  1   50 1   1024  
  1   66     4  
  1         348  
  1         7  
  2         806  
  2         2  
  2         3  
  2         10  
  2         12  
  2         20  
  1         76