summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLUtils.pm
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2021-10-04 02:24:25 +0000
committerNorbert Preining <preining@logic.at>2021-10-04 02:24:25 +0000
commit29c61301dc7961e86e8fa86219ea4d67f8eb6618 (patch)
tree442f7ef1cb4661b06c6f7d59b843c1fe9b7589c8 /Master/tlpkg/TeXLive/TLUtils.pm
parentd84121c8ce03a3a308b8c846cf3880de2027a6f2 (diff)
tlmgr/perl: Use TEXMFROOT instead of SELFAUTOPARENT (from Daniel Nachun, homebrew)
git-svn-id: svn://tug.org/texlive/trunk@60693 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLUtils.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index e1c07b227b2..1b162d7c5bc 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -1753,7 +1753,7 @@ sub _do_postaction_filetype {
}
my $cmd = $keyval{'cmd'};
- my $texdir = `kpsewhich -var-value=SELFAUTOPARENT`;
+ my $texdir = `kpsewhich -var-value=TEXMFROOT`;
chomp($texdir);
my $texdir_bsl = conv_to_w32_path($texdir);
$cmd =~ s!^("?)TEXDIR/!$1$texdir/!g;
@@ -1828,7 +1828,7 @@ sub _do_postaction_script {
if (win32() && defined($keyval{'filew32'})) {
$file = $keyval{'filew32'};
}
- my $texdir = `kpsewhich -var-value=SELFAUTOPARENT`;
+ my $texdir = `kpsewhich -var-value=TEXMFROOT`;
chomp($texdir);
my @syscmd;
if ($file =~ m/\.pl$/i) {
@@ -1903,7 +1903,7 @@ sub _do_postaction_shortcut {
&log("postaction $how shortcut for " . $tlpobj->name . "\n");
if ($how eq "install") {
- my $texdir = `kpsewhich -var-value=SELFAUTOPARENT`;
+ my $texdir = `kpsewhich -var-value=TEXMFROOT`;
chomp($texdir);
my $texdir_bsl = conv_to_w32_path($texdir);
$icon =~ s!^TEXDIR/!$texdir/!;