summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin/c2l
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2021-02-27 17:20:15 +0000
committerKarl Berry <karl@freefriends.org>2021-02-27 17:20:15 +0000
commit310b3431701a5431c7cb300ea507dfdb3a2a2aca (patch)
tree4eb4febdc3352746fac679e7b2a6b836d38c8e02 /Master/tlpkg/bin/c2l
parenta9ab728d2a8b514da67b964a845f2e5bb7308f60 (diff)
build urls, doc
git-svn-id: svn://tug.org/texlive/trunk@57971 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/bin/c2l')
-rwxr-xr-xMaster/tlpkg/bin/c2l2
1 files changed, 2 insertions, 0 deletions
diff --git a/Master/tlpkg/bin/c2l b/Master/tlpkg/bin/c2l
index e239adaa5bd..40ee1923eb3 100755
--- a/Master/tlpkg/bin/c2l
+++ b/Master/tlpkg/bin/c2l
@@ -11,12 +11,14 @@ use Cwd;
use File::Basename;
$| = 1;
+umask 022;
exit (&main ());
sub main {
my $real0 = Cwd::abs_path ($0);
my $scriptdir = File::Basename::dirname ($real0); # .../Master/tlpkg/bin
my $TLROOT = Cwd::abs_path ("$scriptdir/../../.."); # ...
+ chdir ($scriptdir) || die "chdir($scriptdir) failed"; # avoid . in PATH confusion
# platform abbrev
my $arg = $ARGV[0];