File Coverage

blib/lib/Dist/Joseki/DistType/ModuleBuild.pm
Criterion Covered Total %
statement 9 30 30.0
branch 0 4 0.0
condition n/a
subroutine 3 10 30.0
pod 0 7 0.0
total 12 51 23.5


line stmt bran cond sub pod time code
1             package Dist::Joseki::DistType::ModuleBuild;
2 1     1   7 use warnings;
  1         2  
  1         37  
3 1     1   5 use strict;
  1         2  
  1         35  
4 1     1   6 use base 'Dist::Joseki::DistType::Base';
  1         1  
  1         731  
5             our $VERSION = '0.20';
6              
7             sub is_built {
8 0     0 0   my $self = shift;
9 0           -e 'Build';
10             }
11              
12             sub ACTION_build {
13 0     0 0   my $self = shift;
14 0 0         return if $self->is_built;
15 0           $self->safe_system($^X, 'Build.PL');
16             }
17              
18             sub ACTION_default {
19 0     0 0   my $self = shift;
20 0           $self->depends_on('build');
21 0           $self->safe_system($^X, 'Build');
22             }
23              
24             sub ACTION_distclean {
25 0     0 0   my $self = shift;
26 0 0         return unless $self->is_built;
27 0           $self->safe_system($^X, 'Build', 'distclean');
28             }
29              
30             sub ACTION_disttest {
31 0     0 0   my $self = shift;
32 0           $self->depends_on('default');
33 0           $self->safe_system($^X, 'Build', 'test');
34             }
35              
36             sub ACTION_distinstall {
37 0     0 0   my $self = shift;
38 0           $self->depends_on('disttest');
39 0           $self->safe_system('sudo', $^X, 'Build', 'install');
40             }
41              
42             sub ACTION_manifest {
43 0     0 0   my $self = shift;
44 0           $self->depends_on('build');
45 0           unlink 'MANIFEST';
46 0           $self->safe_system($^X, 'Build', 'manifest');
47             }
48             1;
49             __END__