summaryrefslogtreecommitdiff
path: root/Master/texmf
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-02-09 07:42:52 +0000
committerNorbert Preining <preining@logic.at>2009-02-09 07:42:52 +0000
commitbe8be324bb2b51a0f44d297490ea0ab47ad0381d (patch)
tree476bb1e543e34b5e65432359ecba293de73cb920 /Master/texmf
parentcae7f6f90f13cfed35ba468df52ce7aed655ad71 (diff)
make docfile data accessible via the tlmgr show <pkg> --list
git-svn-id: svn://tug.org/texlive/trunk@12124 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf')
-rwxr-xr-xMaster/texmf/scripts/texlive/tlmgr.pl11
1 files changed, 10 insertions, 1 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl
index 149a02a05e6..7affa313114 100755
--- a/Master/texmf/scripts/texlive/tlmgr.pl
+++ b/Master/texmf/scripts/texlive/tlmgr.pl
@@ -839,7 +839,16 @@ sub action_show {
}
if ($foo->docfiles) {
print "doc files:\n";
- for my $f (sort $foo->docfiles) { print " $f\n"; }
+ for my $f (sort $foo->docfiles) {
+ print " $f";
+ my $dfd = $foo->docfiledata;
+ if (defined($dfd->{$f})) {
+ for my $k (keys %{$dfd->{$f}}) {
+ print " $k=\"", $dfd->{$f}->{$k}, '"';
+ }
+ }
+ print "\n";
+ }
}
# in case we have them
if ($foo->allbinfiles) {