line |
true |
false |
branch |
102
|
0 |
0 |
if ($self->dryrun) { }
|
110
|
0 |
0 |
unless ($success)
|
113
|
0 |
0 |
if ($err)
|
138
|
0 |
0 |
if (not defined $version) { }
|
143
|
0 |
0 |
if ($version eq 'latest') { }
|
170
|
0 |
0 |
if ($options->{'style'} eq 'debian') { }
|
174
|
0 |
0 |
unless ($options->{'pkgname'})
|
196
|
0 |
0 |
unless ($self->dryrun)
|
197
|
0 |
0 |
if ($needs_add)
|
228
|
0 |
0 |
if (-f $logfile)
|
229
|
0 |
0 |
unless my $log = 'IO::File'->new($logfile, 'r')
|
240
|
0 |
0 |
unless $tmplog->close
|
242
|
0 |
0 |
unless ($options->{'dryrun'})
|
243
|
0 |
0 |
unless rename $tmpname, $logfile
|
266
|
0 |
0 |
unless ($options->{'email'})
|
271
|
0 |
0 |
unless ($email_addr)
|
282
|
0 |
0 |
unless ($email_addr =~ /<.+>/)
|
301
|
0 |
0 |
unless my $tt = 'Template'->new({'INCLUDE_PATH', $dir})
|
323
|
0 |
0 |
if (-e $logfile)
|
327
|
0 |
0 |
unless $tt->process(\$template, \%args, $tmplog)
|
330
|
0 |
0 |
unless $tmplog->close
|
333
|
0 |
0 |
unless ($options->{'dryrun'})
|
334
|
0 |
0 |
unless rename $tmpname, $logfile
|
348
|
0 |
0 |
unless ($self->dryrun or -d $to_dir)
|
350
|
0 |
0 |
if ($@)
|
359
|
0 |
0 |
unless chmod $mode, $to_dir
|
372
|
0 |
0 |
if ($self->dryrun) { }
|
376
|
0 |
0 |
unless File::Copy::syscopy($from, $to)
|
379
|
0 |
0 |
unless chmod $mode, $to
|
380
|
0 |
0 |
unless utime $atime, $mtime, $to
|
405
|
0 |
0 |
unless $tmpfh->close
|
408
|
0 |
0 |
unless ($self->dryrun)
|
409
|
0 |
0 |
unless rename $tmpname, $version_file
|