summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin/tlprm
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2007-12-03 15:11:01 +0000
committerNorbert Preining <preining@logic.at>2007-12-03 15:11:01 +0000
commit8769358c65a1821de408076b69cf94f3ce2073a4 (patch)
treea827b5dda42bd3712f55c7adf38d978d25c30322 /Master/tlpkg/bin/tlprm
parent9edb5feefe19dfb1ba540bbcca521a1904136609 (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/tlprm')
-rwxr-xr-xMaster/tlpkg/bin/tlprm5
1 files changed, 2 insertions, 3 deletions
diff --git a/Master/tlpkg/bin/tlprm b/Master/tlpkg/bin/tlprm
index 60ec0622cce..24c16ff624a 100755
--- a/Master/tlpkg/bin/tlprm
+++ b/Master/tlpkg/bin/tlprm
@@ -43,13 +43,12 @@ sub main
# xx should default in TLPDB.
chomp (my $Master = `cd $mydir/../.. && pwd`);
- my $tlpdb_path = "$Master/$TeXLive::TLConfig::InfraLocation/texlive.tlpdb";
- my $tlpdb = TeXLive::TLPDB->new (location => $tlpdb_path);
+ my $tlpdb = TeXLive::TLPDB->new (root => $Master);
foreach my $f (@ARGV) {
my $obj = $tlpdb->get_package ($f);
if (! $obj) {
- warn "$0: no TeX Live package named $f (in $Master/texlive.tlpdb).\n";
+ warn "$0: no TeX Live package named $f.\n";
$failure_count++;
next;
}