blib/lib/PRANG/Graph/Class.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 4 | 4 | 100.0 |
branch | 1 | 2 | 50.0 |
condition | n/a | ||
subroutine | 2 | 2 | 100.0 |
pod | n/a | ||
total | 7 | 8 | 87.5 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | |||||||
2 | package PRANG::Graph::Class; | ||||||
3 | $PRANG::Graph::Class::VERSION = '0.19'; | ||||||
4 | # this role is a hangover from the pre-metarole conversion. It should | ||||||
5 | # not be required any more. You should use | ||||||
6 | # $class->meta->does_role("PRANG::Graph::Meta::Class"); | ||||||
7 | |||||||
8 | 1 | 1 | 1260 | use Moose::Role; | |||
1 | 2 | ||||||
1 | 6 | ||||||
9 | |||||||
10 | BEGIN { | ||||||
11 | 1 | 50 | 1 | 4866 | warn "PRANG::Graph::Class is now deprecated" | ||
12 | unless $0 =~ /00-load.t/; | ||||||
13 | } | ||||||
14 | |||||||
15 | 1; | ||||||
16 |