From 0e7e4d3fcb2c0a18212824f21ffb8d8e11415c45 Mon Sep 17 00:00:00 2001 From: Siep Kroonenberg Date: Thu, 16 Jan 2014 10:48:18 +0000 Subject: Added install-tl-windows.bat git-svn-id: svn://tug.org/texlive/trunk@32687 c570f23f-e606-0410-a88d-b1316a301751 --- Master/install-tl-windows.bat | 80 ++++++++++++++++++++++++++ Master/tlpkg/tlpsrc/00texlive.installer.tlpsrc | 1 + Master/tlpkg/tlpsrc/texlive-scripts.tlpsrc | 1 + 3 files changed, 82 insertions(+) create mode 100755 Master/install-tl-windows.bat diff --git a/Master/install-tl-windows.bat b/Master/install-tl-windows.bat new file mode 100755 index 00000000000..1fe05af0867 --- /dev/null +++ b/Master/install-tl-windows.bat @@ -0,0 +1,80 @@ +@echo off +rem $Id: install-tl.bat 30369 2013-05-10 13:01:27Z siepo $ +rem Wrapper script to set up environment for installer +rem +rem Public domain. +rem Originally written 2009 by Tomasz M. Trzeciak. + +rem First, check if this is DOS based system +rem in DOS '^' is just a normal character +if not ^x==x goto DOS + +rem Localize environment changes +setlocal enableextensions + +rem Batch subroutines require a cd to the batchfile directory. +rem For UNC paths, pushd will create a temporary mapping. +pushd "%~dp0" + +rem Remove any double quotes from PATH (why we care for it at all???) +set "path=%path:"=%" + +rem Break search path into dir list and rebuild w/o tex dirs +call :rebuildpath ";" "%path:;=" "%" +if "%path:~0,1%"==";" set "path=%path:~1%" + +rem Use TL Perl +set "path=%~dp0tlpkg\tlperl\bin;%path%" +set "PERL5LIB=%~dp0tlpkg\tlperl\lib" + +rem Clean environment from other Perl variables +set PERL5OPT= +set PERLIO= +set PERLIO_DEBUG= +set PERLLIB= +set PERL5DB= +set PERL5DB_THREADED= +set PERL5SHELL= +set PERL_ALLOW_NON_IFS_LSP= +set PERL_DEBUG_MSTATS= +set PERL_DESTRUCT_LEVEL= +set PERL_DL_NONLAZY= +set PERL_ENCODING= +set PERL_HASH_SEED= +set PERL_HASH_SEED_DEBUG= +set PERL_ROOT= +set PERL_SIGNALS= +set PERL_UNICODE= + +set errlev=0 +rem Start installer +path +echo "%~dp0install-tl" %* +perl "%~dp0install-tl" %* + +rem The nsis installer will need this: +if errorlevel 1 set errlev=1 +pause +goto :eoff + +rem Subroutine to build search path without tex directories +rem any dir containing pdftex.exe is considered a tex dir +:rebuildpath ";" dir list ... +shift +rem The first argument (";") serves as a marker to reset the path +if "%~0"==";" set path= +rem Finish if no more arguments to process +if [%1]==[] goto :eof +rem Continue if tex dir +if exist "%~1\pdftex.exe" goto :rebuildpath +rem Add dir to path +set "path=%path%;%~1" +goto :rebuildpath + +:DOS +echo DOS and Windows 9x systems are not supported. Sorry. +echo Windows 2000 or newer is required. +pause + +:eoff +if unc == 1 popd diff --git a/Master/tlpkg/tlpsrc/00texlive.installer.tlpsrc b/Master/tlpkg/tlpsrc/00texlive.installer.tlpsrc index 01b88d89c96..f067c888ee8 100644 --- a/Master/tlpkg/tlpsrc/00texlive.installer.tlpsrc +++ b/Master/tlpkg/tlpsrc/00texlive.installer.tlpsrc @@ -24,6 +24,7 @@ runpattern !f tlpkg/installer/tar.exe binpattern d/win32 tlpkg/tlperl binpattern f/win32 tlpkg/installer/tar.exe binpattern f/win32 install-tl.bat +binpattern f/win32 install-tl-windows.bat binpattern f/win32 install-tl-advanced.bat # # xz/xzdec binaries for all: diff --git a/Master/tlpkg/tlpsrc/texlive-scripts.tlpsrc b/Master/tlpkg/tlpsrc/texlive-scripts.tlpsrc index 00791f4ff58..dd8b5158204 100644 --- a/Master/tlpkg/tlpsrc/texlive-scripts.tlpsrc +++ b/Master/tlpkg/tlpsrc/texlive-scripts.tlpsrc @@ -19,6 +19,7 @@ runpattern f tlpkg/installer/install-menu-*.pl runpattern f tlpkg/installer/ctan-mirrors.pl runpattern f tlpkg/installer/texlive.png binpattern f/win32 install-tl.bat +binpattern f/win32 install-tl-windows.bat binpattern f/win32 install-tl-advanced.bat docpattern f texmf-dist/doc/man/man1/install-tl.* # -- cgit v1.2.3