diff options
author | Norbert Preining <preining@logic.at> | 2007-12-03 15:11:01 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2007-12-03 15:11:01 +0000 |
commit | 8769358c65a1821de408076b69cf94f3ce2073a4 (patch) | |
tree | a827b5dda42bd3712f55c7adf38d978d25c30322 /Master/tlpkg/bin/tlpfiles | |
parent | 9edb5feefe19dfb1ba540bbcca521a1904136609 (diff) |
BIG change: no TLPDB->location anymore, but TLPDB->root
git-svn-id: svn://tug.org/texlive/trunk@5697 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/bin/tlpfiles')
-rwxr-xr-x | Master/tlpkg/bin/tlpfiles | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/bin/tlpfiles b/Master/tlpkg/bin/tlpfiles index 41bc8a48f8d..1409b875569 100755 --- a/Master/tlpkg/bin/tlpfiles +++ b/Master/tlpkg/bin/tlpfiles @@ -51,10 +51,10 @@ sub main # report files in given package. my $pkg = $ARGV[0]; - my $tlpdb = TeXLive::TLPDB->new (location => $tlpdb_path); + my $tlpdb = TeXLive::TLPDB->new (root => $Master); my $obj = $tlpdb->get_package ($pkg); - die "$0: no TeX Live package named $pkg in $tlpdb_path.\n" if ! $obj; + die "$0: no TeX Live package named $pkg in $Master.\n" if ! $obj; my @files = $obj->all_files; print "$_\n" foreach @files; |