line |
true |
false |
branch |
45
|
0 |
0 |
if ($self->builder) { } |
|
0 |
0 |
elsif ($self->utility) { } |
|
0 |
0 |
elsif ($self->inc) { } |
|
0 |
0 |
elsif ($self->add_deps) { } |
|
0 |
0 |
elsif ($self->delete_deps) { } |
58
|
0 |
0 |
unless my $name = shift() |
63
|
0 |
0 |
if ($dep =~ /(.*)=(.*)/) |
68
|
0 |
0 |
unless $$requires{'requires'}{$dep} |
72
|
0 |
0 |
if ($new_dep) |
83
|
0 |
0 |
unless my $name = shift() |
88
|
0 |
0 |
if ($$requires{$type} and exists $$requires{$type}{$dep}) |
96
|
0 |
0 |
if $$refs{$dep} > 0 |
99
|
0 |
0 |
if ($deleted) { } |
112
|
0 |
0 |
if ($self->all) { } |
113
|
0 |
0 |
if @_ or $self->as |
123
|
0 |
0 |
unless $name |
126
|
0 |
0 |
if ($branches and $self->as) |
130
|
0 |
0 |
unless $$branches{$name} |
|
0 |
0 |
unless grep {$_ eq $self->as;} @{[] unless $$branches{$name};} |
134
|
0 |
0 |
if ($new_source) |
135
|
0 |
0 |
$self->log_level ? : |
|
0 |
0 |
$self->log_file ? : |
|
0 |
0 |
$self->as ? : |
|
0 |
0 |
if system "$0 relocate -r " . $self->repository . ($self->log_level ? ' --log-level ' . $self->log_level : '') . ($self->log_file ? ' --log-file ' . $self->log_file : '') . ($self->as ? ' --as ' . $self->as : '') . " $name $new_source" |
158
|
0 |
0 |
if ($self->follow) { } |
163
|
0 |
0 |
if $checked{$name}++ |
186
|
0 |
0 |
if ($self->only_sources) { } |
187
|
0 |
0 |
if ($_ eq $name) { } |
200
|
0 |
0 |
$self->log_level ? : |
|
0 |
0 |
$self->log_file ? : |
|
0 |
0 |
$self->as ? : |
|
0 |
0 |
$self->version ? : |
235
|
0 |
0 |
if ($$source{$name}) { } |
236
|
0 |
0 |
ref $$source{$name} ? : |
254
|
0 |
0 |
if ($name =~ /^cpan-/) { } |
|
0 |
0 |
elsif ($$map{$name}) { } |
265
|
0 |
0 |
unless ($s) |
284
|
0 |
0 |
$shipwright->source->isa('Shipwright::Source::Shipyard') ? : |