File Coverage

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.21';
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   1726 use Moose::Role;
  1         2  
  1         6  
9              
10             BEGIN {
11 1 50   1   5233 warn "PRANG::Graph::Class is now deprecated"
12             unless $0 =~ /00-load.t/;
13             }
14              
15             1;
16