File Coverage

blib/lib/Module/Setup/Path/Dir.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 21 21 100.0


line stmt bran cond sub pod time code
1             package Module::Setup::Path::Dir;
2 41     41   175 use strict;
  41         68  
  41         1151  
3 41     41   188 use warnings;
  41         59  
  41         1108  
4 41     41   180 use base 'Path::Class::Dir';
  41         61  
  41         4300  
5              
6 41     41   215 use Module::Setup;
  41         71  
  41         3812  
7              
8             sub mkpath {
9 351     351 1 1090 my $self = shift;
10 351         1371 Module::Setup::log($self, "Creating directory $self");
11 351         1590 $self->Path::Class::Dir::mkpath(@_);
12             }
13             1;