summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-07-04 23:20:46 +0000
committerNorbert Preining <preining@logic.at>2009-07-04 23:20:46 +0000
commitc1e9b94b369b16f7ae2344a097946bd057bcbed9 (patch)
treed37f73ba29e3c4358c3d39e9d635a5b1f642774a /Master
parent2518dbfae8b159421d824512fdac143394815938 (diff)
replace TEXDIR with the root in do_postaction_fileassoc
git-svn-id: svn://tug.org/texlive/trunk@14100 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm7
1 files changed, 6 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 34e9788bb88..d39dd00c682 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -1475,7 +1475,12 @@ sub _do_postaction_filetype {
return 0;
}
my $cmd = $keyval{'cmd'};
-
+
+ my $texdir = `kpsewhich -var-value=SELFAUTOPARENT`;
+ chomp($texdir);
+ my $texdir_bsl = conv_to_w32_path($texdir);
+ $cmd =~ s!^TEXDIR/!$texdir/!g;
+
&log("postaction $how filetype for " . $tlpobj->name .
": $name, $cmd\n");
if ($how eq "install") {