diff options
| -rwxr-xr-x | sbosrcarch | 26 |
1 files changed, 15 insertions, 11 deletions
@@ -1680,7 +1680,7 @@ sub check_info_wanted { my ($category, $prgnam, $file) = split /\//; if(blacklisted("$category/$prgnam")) { - warn " $category/$prgnam blacklisted, skipping\n"; + print " $category/$prgnam blacklisted, skipping\n" if $verbosecheck; return; } @@ -1726,14 +1726,6 @@ sub check_mode { print "by-md5 contains both symlinks and hardlinks (harmless but messy)\n"; } - print "--- by-name summary\n"; - if(@missingfilebuilds) { - print "Following SlackBuilds are missing by-name files:\n"; - print " $_\n" for sort { $a cmp $b } @missingfilebuilds; - } else { - print "All SlackBuild download files present in by-name.\n"; - } - my $totalbuildcount = keys %infofilecount; my $missingbuildcount = @missingfilebuilds; my $completebuildcount = $totalbuildcount - $missingbuildcount; @@ -1747,6 +1739,8 @@ sub check_mode { my $md5_filecoverage = sprintf("%.2f", $md5_filecount * 100 / $md5_totalfiles); print <<EOF; + +--- by-name status: Total source files: $totalfiles Archived files: $filecount Archive size: $filemegs @@ -1754,13 +1748,23 @@ Missing files: $missingfiles Extraneous files: $extraneous_byname File coverage: $filecoverage% ---- SlackBuild summary (based on by-name) +--- SlackBuild status (based on by-name): Total SlackBuilds: $totalbuildcount SlackBuilds with all files present: $completebuildcount SlackBuilds missing at least one file: $missingbuildcount SlackBuild coverage: $coverage% +EOF + + if(@missingfilebuilds) { + print "Following SlackBuilds are missing by-name files:\n"; + print " $_\n" for sort { $a cmp $b } @missingfilebuilds; + } else { + print "All SlackBuild download files present in by-name.\n"; + } + +print <<EOF ---- by-md5 summary: +--- by-md5 status: Total source files: $md5_totalfiles Archived files: $md5_filecount Missing files: $md5_missingfiles |