| blib/lib/Mo/Mouse.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| statement | 18 | 18 | 100.0 |
| branch | 2 | 2 | 100.0 |
| condition | 4 | 7 | 57.1 |
| subroutine | 3 | 3 | 100.0 |
| pod | n/a | ||
| total | 27 | 30 | 90.0 |
| line | stmt | bran | cond | sub | pod | time | code |
|---|---|---|---|---|---|---|---|
| 1 | package Mo::Mouse;$M="Mo::"; | ||||||
| 2 | $VERSION=0.38; | ||||||
| 3 | 1 | 100 | 50 | 1 | 962 | *{$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;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 | 1271 | ||||
| 1 | 66 | 1 | 6 | ||||
| 1 | 446 | ||||||
| 2 | 1085 | ||||||
| 2 | 3 | ||||||
| 2 | 4 | ||||||
| 2 | 14 | ||||||
| 2 | 16 | ||||||
| 2 | 25 | ||||||
| 1 | 81 | ||||||
| 1 | 15 | ||||||
| 1 | 6 | ||||||
| 1 | 4 | ||||||
| 1 | 7 | ||||||
| 1 | 49777 | ||||||
| 1 | 920 | ||||||
| 1 | 421 |