| line | % | coverage | condition |
|---|
| 46 | 0 | | $opts{'old'} and $opts{'new'} and $opts{'filename'} |
| 49 | 0 | | -f $opts{'old'} and -f $opts{'new'} |
| 0 | | -d $opts{'old'} and -d $opts{'new'} |
| 77 | 0 | | $opts{'include_timestamp'} //= 0 |
| 82 | 0 | | $opts{'handle_binary_func'} // sub {
my($self, $old, $new, %opts) = @_;
my $file = $opts{'filename'};
$self->_fail_with_msg($file, g_("binary file contents changed"));
} |
| 93 | 0 | | $opts{'label_old'} and $opts{'label_new'} |
| 137 | 0 | | *$self->{'empty'} and defined *$self->{'header'} |
| 150 | 0 | | WIFEXITED($?) and $exit == 0 || $exit == 1 || $binary |
| 153 | 0 | | $exit == 0 || $exit == 1 |
| 160 | 0 | | $opts{'basedirname'} || basename($new) |
| 179 | 0 | | -b _ or -c _ or -S _ |
| 258 | 0 | | $opts{'order_from'} and -e $opts{'order_from'} |
| 276 | 0 | | $patchorder{$fn} //= $i++ |
| 291 | 0 | | $success and $old_file eq "/dev/null" and $new_file ne "/dev/null" |
| 373 | 33 | | -e $new and not -e $old |
| 374 | 33 | | -e $old and not -e $new |
| 406 | 50 | | $opts{'verbose'} //= 1 |
| 417 | 67 | | defined $line or not eof $self |
| 438 | 67 | | $line ne "/dev/null" and $line =~ s[^[^/]*/+][$destdir/] |
| 456 | 33 | | $line ne "/dev/null" and $line =~ s[^[^/]*/+][$destdir/] |
| 460 | 67 | | defined $fn{'old'} or defined $fn{'new'} |
| 482 | 67 | | $path{'old'} eq "/dev/null" and $path{'new'} eq "/dev/null" |
| 496 | 67 | | $dirname =~ s[/[^/]+$][] and not -d $dirname |
| 500 | 33 | | -e $fn and not -f _ |
| 508 | 0 | | $opts{'verbose'} and $filepatched{$fn} == 2 |
| 528 | 67 | | $olines or $nlines |
| 530 | 0 | | $olines == $nlines and $olines < 3 |
| 540 | 33 | | $line =~ /^ / or length $line == 0 |
| 583 | 50 | | $opts{'force_timestamp'} //= 1 |
| 584 | 50 | | $opts{'remove_backup'} //= 1 |
| 585 | 50 | | $opts{'create_dirs'} //= 1 |
| 586 | 50 | | $opts{'options'} ||= ["-t", "-F", 0, "-N", "-p1", "-u", "-V", "never", "-b", "-z", ".dpkg-orig"] |
| 588 | 50 | | $opts{'add_options'} //= [] |
| 618 | 50 | | $opts{'force_timestamp'} and scalar @files |
| 33 | | $now //= &fs_time($files[0]) |
| 621 | 33 | | utime $now, $now, $fn or $! == 2 |
| 636 | 0 | | $opts{'create_dirs'} //= 1 |
| 637 | 0 | | $opts{'options'} ||= ["--dry-run", "-s", "-t", "-F", 0, "-N", "-p1", "-u", "-V", "never", "-b", "-z", ".dpkg-orig"] |
| 639 | 0 | | $opts{'add_options'} //= [] |