diff options
author | Norbert Preining <preining@logic.at> | 2007-12-26 13:54:00 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2007-12-26 13:54:00 +0000 |
commit | 75f5177b07143ba69356cd65e543f60d8d227358 (patch) | |
tree | 8fe5ea51ab22fd2ea9c5da9a8427fef64ed80af9 /Master/tlpkg | |
parent | 2b8d3bc25a93d9bb46f26fe9d44e9a48d93b4894 (diff) |
output beautifying
git-svn-id: svn://tug.org/texlive/trunk@5921 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rwxr-xr-x | Master/tlpkg/bin/check-tlpdb-coverage | 14 |
1 files changed, 12 insertions, 2 deletions
diff --git a/Master/tlpkg/bin/check-tlpdb-coverage b/Master/tlpkg/bin/check-tlpdb-coverage index 4ab6510739c..8e177fa0c4e 100755 --- a/Master/tlpkg/bin/check-tlpdb-coverage +++ b/Master/tlpkg/bin/check-tlpdb-coverage @@ -59,10 +59,20 @@ sub main if ($#k > 1) { push @multicolls, $pkg; } } if (@notincolls) { - print "NOT COVERED PACKAGES: @notincolls\n"; + print "NOT COVERED PACKAGES:\n"; + for my $pkg (@notincolls) { + print "\t$pkg\n"; + } } if (@multicolls) { - print "MULTIPLE COVERED PACKAGES: @multicolls\n"; + print "MULTIPLE COVERED PACKAGES: \n"; + for my $pkg (@multicolls) { + print "\t$pkg: "; + for my $c (keys %{$found{$pkg}}) { + print "$c " if ($c ne "present"); + } + print "\n"; + } } } |