@echo off rem Copyright 2008 Siep Kroonenberg. rem You may freely use, modify and/or distribute this file. rem TeX Live Root; ends with backslash rem This should also work with UNC names set TEXDIR=%~dp0 set tldrive=%~d0 %tldrive% cd %TEXDIR% rem TEXDIR writable? set TEXDIRW=%USERPROFILE%\.tlportable2008\ del "%TEXDIR%tl_wrtest" 2>nul echo Testing for write access %TEXDIR%... echo Hello >"%TEXDIR%tl_wrtest" if not exist "%TEXDIR%tl_wrtest" goto wrtestdone del "%TEXDIR%tl_wrtest" set TEXDIRW=%TEXDIR% :wrtestdone if not exist "%TEXDIRW%" md "%TEXDIRW%" rem Use TEXMFHOME for private data, rem TEXMFLOCAL for department- or workgroup data. rem It is allright if TEXMFLOCAL does not exist. set TEXMFSYSVAR=%TEXDIRW%texmf-var if exist "%TEXDIR%texmf-var" set TEXMFSYSVAR=%TEXDIR%texmf-var set TEXMFSYSCONFIG=%TEXDIRW%texmf-config if exist "%TEXDIR%texmf-config" set TEXMFSYSCONFIG=%TEXDIR%texmf-config set TEXMFMAIN=%TEXDIR%texmf set TEXMFDIST=%TEXDIR%texmf-dist set TEXMFLOCAL=%TEXDIR%texmf-local set TEXMFHOME=%TEXDIRW%texmf-home set TEXMFVAR=%TEXDIRW%texmf-var set TEXMFCONFIG=%TEXDIRW%texmf-config set TEXBINDIR=%TEXDIR%bin\win32 set platform=win32 rem use provided Perl set PERL5LIB=%TEXDIR%tlpkg\installer\perllib "%TEXDIR%tlpkg\installer\perl" "%TEXDIR%install-tl" --portable if not errorlevel 1 goto doit echo Initialization of TeXLive failed! pause exit :doit path %TEXDIR%bin\win32;%path% set PROMPT=TL $P$G %COMSPEC% /k exit