From c1e9b94b369b16f7ae2344a097946bd057bcbed9 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Sat, 4 Jul 2009 23:20:46 +0000 Subject: replace TEXDIR with the root in do_postaction_fileassoc git-svn-id: svn://tug.org/texlive/trunk@14100 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLUtils.pm | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'Master/tlpkg/TeXLive/TLUtils.pm') 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") { -- cgit v1.2.3