diff options
author | Norbert Preining <preining@logic.at> | 2008-01-07 07:07:17 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-01-07 07:07:17 +0000 |
commit | 3509b3c52608d043aa2fdeeffa0f4629c4c85b69 (patch) | |
tree | edcbd25735716f96da5d5a30943dd7e26079eded /Master/install-tl.pl | |
parent | 46b5d91f85b59877603c299b683580c153eb6da4 (diff) |
fix calling of generate-* scripts in the do_postinst by using the
installed perl interpreter on win32, and use the tlperl perl/lib
git-svn-id: svn://tug.org/texlive/trunk@6068 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl.pl')
-rwxr-xr-x | Master/install-tl.pl | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/Master/install-tl.pl b/Master/install-tl.pl index 03da25ed2af..33145d5f8cb 100755 --- a/Master/install-tl.pl +++ b/Master/install-tl.pl @@ -594,17 +594,18 @@ sub do_postinst_stuff { if (defined($ENV{'PERL5LIB'})) { $perllib = $ENV{'PERL5LIB'}; } - $perllib .= ";$vars{'TEXDIR'}/tlpkg/lib/Perl5_lib-TL_inst"; + $perllib .= ";$vars{'TEXDIR'}/tlpkg/tlperl/lib"; $ENV{'PERL5LIB'} = $perllib; } # # Step 4: run the programs - `generate-fmtutil`; - `generate-updmap`; - `generate-language`; - my $perlint = "$vars{'TEXDIR'}/tlpkg/bin/perl.exe"; - my $updmap = (win32() ? "$perlint $vars{'TEXDIR'}/bin/win32/updmap-sys.pl" : "updmap-sys"); + my $perlint = (win32() ? "$vars{'TEXDIR'}/tlpkg/tlperl/bin/perl.exe" : ""); + # for arch != win32 $perlint is empty so the usual perl invocation is done + `$perlint generate-fmtutil`; + `$perlint generate-updmap`; + `$perlint generate-language`; `mktexlsr $vars{'TEXDIR'}/texmf-dist $vars{'TEXDIR'}/texmf $vars{'TEXDIR'}/texmf-local`; + my $updmap = (win32() ? "$perlint $vars{'TEXDIR'}/bin/win32/updmap-sys.pl" : "updmap-sys"); `$updmap --nohash`; `mktexlsr $vars{'TEXMFSYSVAR'}`; |