From 89932411328fa7d9375927a54406fa3e5a8dc3da Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 1 Nov 2016 17:52:42 +0000 Subject: more check excludes; cd away for tlpsrc git-svn-id: svn://tug.org/texlive/trunk@42414 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/bin/tlprm | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'Master/tlpkg/bin/tlprm') diff --git a/Master/tlpkg/bin/tlprm b/Master/tlpkg/bin/tlprm index 9158e6371b7..4ff9155a251 100755 --- a/Master/tlpkg/bin/tlprm +++ b/Master/tlpkg/bin/tlprm @@ -38,6 +38,10 @@ sub main { my $failure_count = 0; chomp (my $Master = `cd $mydir/../.. && pwd`); + # cd anywhere would do, but if in tlpsrc the .tlpsrc file itself + # is listed incorrectly as directly under Master. + chdir ($Master) || die "chdir($Master) failed: $!"; + my $tlpdb = TeXLive::TLPDB->new ("root" => $Master); foreach my $f (@ARGV) { -- cgit v1.2.3