File Coverage

blib/lib/CPAN/Packager/Builder/Role.pm

Criterion	Covered	Total	%
statement	6	15	40.0
branch	0	8	0.0
condition	0	3	0.0
subroutine	2	4	50.0
pod	0	2	0.0
total	8	32	25.0

package CPAN::Packager::Builder::Role;
use Mouse::Role;

requires 'build';
requires 'print_installed_packages';
requires 'package_name';
requires 'is_installed';

has 'package_output_dir' => (
    is       => 'rw',
    required => 1
);

has 'conf' => (
    is       => 'rw',
    required => 1
);

has 'release' => (
    is      => 'rw',
    default => 1,
);

has 'pkg_name' => (
    is      => 'rw',
    isa     => 'Str',
);

sub config {
    my ( $self, $key, $value ) = @_;
    die 'key must be passed'   unless $key;
    die 'value must be passed' unless $value;

    return () unless $self->conf->{$key};
    return $self->conf->{$key}->{$value} || ();
}

sub get_package_name {
    my ($self, $module) = @_;

    if ($self->pkg_name) {
        return $self->pkg_name;
    }
    else {
        return $self->package_name( $module->{module} );
    }
}

no Mouse::Role;

1;
__END__