diff options
author | Norbert Preining <preining@logic.at> | 2008-09-28 08:44:02 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-09-28 08:44:02 +0000 |
commit | 3fb7f4af6f70321f40a0647129638aeefc03c85f (patch) | |
tree | a461618bca347b01dfd2246bcedea1f4e50fb72c /Master | |
parent | 272c308e72c3710ecccb02501808d320eb161c09 (diff) |
tlmgr: make collection reporting actually working
git-svn-id: svn://tug.org/texlive/trunk@10768 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index d0511cf0626..f30d1bc35ba 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -439,7 +439,6 @@ sub action_show { } init_local_db(); my $tlmediatlpdb; - my @colls; foreach my $pkg (@ARGV) { my $tlp = $localtlpdb->get_package($pkg); my $installed = 0; @@ -451,6 +450,9 @@ sub action_show { $tlp = $tlmediatlpdb->get_package($pkg); } else { $installed = 1; + } + if ($tlp) { + my @colls; if ($tlp->category ne "Collection" && $tlp->category ne "Scheme") { @colls = $localtlpdb->needed_by($pkg); if (!@colls) { @@ -462,8 +464,6 @@ sub action_show { @colls = $tlmediatlpdb->needed_by($pkg); } } - } - if ($tlp) { print "Package: ", $tlp->name, "\n"; print "Category: ", $tlp->category, "\n"; print "ShortDesc: ", $tlp->shortdesc, "\n" if ($tlp->shortdesc); |