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 sysopen my $fh, $fn, $mode |
34
|
0 |
0 |
unless CORE::binmode $fh, $self->binmode |
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'}
} |