| line |
true |
false |
branch |
|
12
|
1 |
0 |
unless delete $self->{'applied'} |
|
25
|
0 |
0 |
unless opendir my $dh, $dir |
|
30
|
0 |
0 |
unless $name =~ /\A[a-z0-9_][a-z0-9_-]*\z/ |
|
32
|
0 |
0 |
$do_rw ? : |
|
33
|
0 |
0 |
unless eval " use open IO => \$self->binmode; sysopen \$fh, \$fn, \$mode " |
|
45
|
0 |
0 |
if (eof $fh) |
|
47
|
0 |
0 |
unless $dep =~ s/^-- preceding-patch(?:es)? =(?=(?: \S+)+$)// |
|
64
|
0 |
0 |
if (my(@u) = $self->grep_unknown($self->applied)) |
|
65
|
0 |
0 |
$skip_missing ? : |
|
|
0 |
0 |
if (my(@u) = $skip_missing ? () : $self->grep_unapplied($self->patches)) |
|
66
|
0 |
0 |
unless not @prob |
|
73
|
0 |
0 |
unless my(@missing) = $self->grep_unapplied($self->patches) |
|
76
|
0 |
0 |
unless ($self->grep_unapplied($self->deps_of($name))) |
|
91
|
0 |
0 |
$do_recreate ? : |
|
|
0 |
0 |
if exists $patches->{$name} xor not !$do_recreate |
|
96
|
0 |
0 |
if ($do_recreate) |
|
98
|
0 |
0 |
if @content and $content[0] =~ /^-- preceding-patch(?:es)? = / |
|
106
|
0 |
0 |
unless @dep |
|
117
|
1 |
14 |
@_ == 2 && $_[0] eq '-e' ? : |
|
|
1 |
15 |
@_ == 2 && $_[0] eq '-r' ? : |
|
|
2 |
16 |
@_ == 1 && !($_[0] =~ /^-/) ? : |
|
124
|
1 |
3 |
if do {
BEGIN {${^WARNING_BITS} = "\x54\x55\x55\x55\x55\x55\x55\x55\x55\x55\x51\x55\x55\x55\x55\x55\x55\x05"}
"" eq $ENV{'EDITOR'}
} |