line |
true |
false |
branch |
36
|
0 |
0 |
unless (can_run($program)) |
65
|
0 |
0 |
unless my $param_ref = $dist->_parse_params(@params) |
91
|
0 |
0 |
unless $dist->_call_plugins('pre_prepare') |
93
|
0 |
0 |
unless $dist->SUPER::prepare(@params) |
95
|
0 |
0 |
unless $dist->_call_plugins('post_prepare') |
104
|
0 |
0 |
unless my $param_ref = $dist->_parse_params(@params) |
115
|
0 |
0 |
unless $dist->SUPER::create(@params) |
119
|
0 |
0 |
unless $dist->_fake_install($param_ref) |
122
|
0 |
0 |
unless $dist->_compress_manual_pages($param_ref) |
124
|
0 |
0 |
unless $dist->_install_docfiles($param_ref) |
126
|
0 |
0 |
unless $dist->_process_installed_files($param_ref) |
128
|
0 |
0 |
unless $dist->_make_installdir($param_ref) |
130
|
0 |
0 |
unless $dist->_write_slack_desc($param_ref) |
132
|
0 |
0 |
unless $dist->_call_plugins('pre_package') |
134
|
0 |
0 |
unless $dist->_write_config_files($param_ref) |
136
|
0 |
0 |
unless $dist->_makepkg($param_ref) |
144
|
0 |
0 |
unless my $param_ref = $dist->_parse_params(@params) |
147
|
0 |
0 |
unless $dist->_installpkg($param_ref) |
173
|
0 |
0 |
unless $param_ref = Params::Check::check($tmpl, \%params) |
185
|
0 |
0 |
unless chdir $module->status->extract |
188
|
0 |
0 |
if ($plugin->can($method)) |
189
|
0 |
0 |
unless $plugin->$method($dist) |
193
|
0 |
0 |
unless chdir $orig_dir |
241
|
0 |
0 |
unless ($wrksrc) |
250
|
0 |
0 |
if ($installer_type eq 'CPANPLUS::Dist::MM') { } |
|
0 |
0 |
elsif ($installer_type eq 'CPANPLUS::Dist::Build') { } |
287
|
0 |
0 |
if ($CPANPLUS::Dist::Slackware::EFFECTIVE_USER_ID > 0) |
289
|
0 |
0 |
if ($fakeroot) { } |
294
|
0 |
0 |
if ($sudo) { } |
309
|
0 |
0 |
if ($needs_chown) |
311
|
0 |
0 |
unless (@stat) |
318
|
0 |
0 |
unless $dist->_chown_recursively(0, 0, $destdir) |
322
|
0 |
0 |
unless (run($cmd, {'dir', $destdir, 'verbose', $verbose})) |
326
|
0 |
0 |
if ($needs_chown) |
327
|
0 |
0 |
if (-d $destdir) |
328
|
0 |
0 |
unless ($dist->_chown_recursively($orig_uid, $orig_gid, $destdir)) |
333
|
0 |
0 |
if (-f $outputname) |
334
|
0 |
0 |
unless ($dist->_chown_recursively($orig_uid, $orig_gid, $outputname)) |
344
|
0 |
0 |
unless ($param_ref->{'keep_source'}) |
347
|
0 |
0 |
unless ($fail) |
349
|
0 |
0 |
unless ($cb->_rmdir('dir', $destdir)) |
355
|
0 |
0 |
$fail ? : |
372
|
0 |
0 |
if ($CPANPLUS::Dist::Slackware::EFFECTIVE_USER_ID > 0) |
374
|
0 |
0 |
if ($sudo) { } |
401
|
0 |
0 |
if (not $filename =~ /\.gz$/ and -f $filename || -l $filename) |
402
|
0 |
0 |
if (not gzip($filename) && unlink($filename)) |
408
|
0 |
0 |
if (@mandirs) |
412
|
0 |
0 |
$fail ? : |
424
|
0 |
0 |
unless ($wrksrc) |
432
|
0 |
0 |
unless $cb->_mkdir('dir', $docdir) |
437
|
0 |
0 |
unless spurt($readmefile, $readme) |
443
|
0 |
0 |
unless spurt($scriptfile, $script) |
449
|
0 |
0 |
unless ($cb->_copy('file', $from, 'to', $docdir)) |
454
|
0 |
0 |
$fail ? : |
467
|
0 |
0 |
unless (@keys) |
470
|
0 |
0 |
if (@keys) |
477
|
0 |
0 |
if ($key =~ m[/man/man]msx) |
478
|
0 |
0 |
unless ($key =~ /\.gz$/msx) |
481
|
0 |
0 |
if (ref $value eq 'HASH') |
482
|
0 |
0 |
if (defined $value->{'type'} and $value->{'type'} eq 'link' and defined $value->{'from'}) |
487
|
0 |
0 |
if ($from =~ m[/man/man]msx) |
488
|
0 |
0 |
unless ($from =~ /\.gz$/msx) |
497
|
0 |
0 |
if (-e "$destdir$key") |
517
|
0 |
0 |
unless ($cb->_chdir('dir', $destdir)) |
526
|
0 |
0 |
if $filename eq '.' |
529
|
0 |
0 |
unless (@stat) |
535
|
0 |
0 |
if -l _ |
539
|
0 |
0 |
unless (chmod $perm, $filename) |
544
|
0 |
0 |
if (-d $filename) { } |
|
0 |
0 |
elsif (-f $filename) { } |
550
|
0 |
0 |
if ($filename eq 'perllocal.pod' or $filename =~ /\.bs$/ and -z $filename) { } |
|
0 |
0 |
elsif ($filename eq '.packlist') { } |
553
|
0 |
0 |
if (not unlink($filename)) |
567
|
0 |
0 |
if ($type =~ /ELF.+(?:executable|shared object)/s) |
568
|
0 |
0 |
if (not strip($filename)) |
578
|
0 |
0 |
unless ($dist->_process_packlist($packlist)) |
583
|
0 |
0 |
unless ($cb->_chdir('dir', $orig_dir)) |
587
|
0 |
0 |
$fail ? : |
612
|
0 |
0 |
unless -d catdir($destdir, 'etc') |
615
|
0 |
0 |
unless ($cb->_chdir('dir', $destdir)) |
626
|
0 |
0 |
if $filename =~ /\.new$/ |
628
|
0 |
0 |
if (-l $filename or -f $filename) |
629
|
0 |
0 |
unless ($cb->_move('file', $filename, 'to', "$filename.new")) |
637
|
0 |
0 |
unless ($cb->_chdir('dir', $orig_dir)) |
641
|
0 |
0 |
if $fail |
642
|
0 |
0 |
unless @conffiles |
647
|
0 |
0 |
unless $dist->_append_config_files_to_readme_slackware(@conffiles) |
701
|
0 |
0 |
if ($CPANPLUS::Dist::Slackware::EFFECTIVE_USER_ID > 0) |
703
|
0 |
0 |
if ($sudo) { } |