From e0bfe40e30a5e7ec19232f432ed1436bfa670cc2 Mon Sep 17 00:00:00 2001 From: Piotr Strzelczyk Date: Tue, 2 Mar 2010 08:36:13 +0000 Subject: bat wrappers not needed for gui stubs git-svn-id: svn://tug.org/texlive/trunk@17284 c570f23f-e606-0410-a88d-b1316a301751 --- Master/bin/win32/dviout.bat | 80 ------------------------------------------- Master/bin/win32/psv.bat | 18 ---------- Master/bin/win32/texworks.bat | 28 --------------- 3 files changed, 126 deletions(-) delete mode 100755 Master/bin/win32/dviout.bat delete mode 100755 Master/bin/win32/psv.bat delete mode 100755 Master/bin/win32/texworks.bat (limited to 'Master') diff --git a/Master/bin/win32/dviout.bat b/Master/bin/win32/dviout.bat deleted file mode 100755 index 2de93d21939..00000000000 --- a/Master/bin/win32/dviout.bat +++ /dev/null @@ -1,80 +0,0 @@ -@echo off -rem Wrapper script to configure and call dviout -rem -rem Originally written 2009 by Siep Kroonenberg and Tomasz M. Trzeciak -rem Public Domain - -rem Make environment changes local -rem Disable delayed expansion (makes processing bang ! char easier) -setlocal enableextensions disabledelayedexpansion - -rem Get TL installation root (short name w/o trailing backslash) -set tlroot=%~sf0: -set tlroot=%tlroot:\bin\win32\dviout.bat:=% -if not exist "%tlroot%\bin\win32\kpsewhich.exe" goto :no_tl -rem Make sure our bin dir is the first one on the path -path %tlroot%\bin\win32;%path% - -rem Ask kpsewhich for TEXMFVAR -for /f "delims=" %%I in ( - 'call "%~dp0kpsewhich.exe" --expand-var "$TEXMFVAR/fonts"' -) do ( - set fontsdir=%%~fI -) -if not exist "%fontsdir%\" md "%fontsdir%" -if not exist "%fontsdir%\" goto :no_fontsdir - -rem Ask kpsewhich for TFM search path -for /f "delims=" %%I in ( - 'call "%~dp0kpsewhich.exe" --show-path tfm' -) do ( - set tfmpath=%%I -) -rem Remove kpse specific syntax from path definition, change slash to backslash -set tfmpath=%tfmpath:!!=% -set tfmpath=%tfmpath:/=\% -rem Split font path var into arguments and rebuild it with only existing 'fonts' dirs -call :build_tfmpath ";" "%tfmpath:;=" "%" -if "%tfmpath:~0,1%"==";" set tfmpath=%tfmpath:~1% - -rem Use TL gostscript -set GS_LIB=%tlroot%\tlpkg\tlgs\fonts;%tlroot%\tlpkg\tlgs\lib -path %tlroot%\tlpkg\tlgs\bin;%path% - -rem Assemble dviout command -set cmdstr="%tlroot%\tlpkg\dviout\dviout.exe" -NULL -dpi=600 -gen="%tlroot%\tlpkg\dviout\gen_pk" -TEXROOT="%tfmpath%" -set cmdstr=%cmdstr% -TEXPK="^r\pk\\^s.^dpk;^r\tfm\\^s^tfm;^r\vf\\^s.vf;^r\ovf\\^s.ovf;^r\tfm\\^s.tfm" -rem Start dviout -start "" %cmdstr% %* -goto :eof - -rem Soubroutine to build font path only with existing "...\fonts" directories -rem Directories to process are supplied as arguments -:build_tfmpath ";" dir list ... -shift -rem The first argument (";") serves as a marker to reset the path -if "%~0"==";" set tfmpath= -rem Finish if no more arguments to process -if "%~1"=="" goto :eof -rem Get short path (dviout has problems with long ones) -set fontsdir=%~sf1 -rem Substitute "\fonts\tfm" in dir name with a marker -rem String substitution in expanded vars is case insensitive -set fontsdir=%fontsdir:\fonts\tfm=\fonts;% -rem Continue if no substitution -if "%fontsdir%"=="%~sf1" goto :build_tfmpath -rem Split dir name on the marker; this leaves us with a "...\fonts" dir -for /f "delims=;" %%I in ("%fontsdir%") do (set fontsdir=%%~sfI) -rem Continue if dir does not exist -if not exist "%fontsdir%\" goto :build_tfmpath -rem Add dir to path -set tfmpath=%tfmpath%;%fontsdir% -goto :build_tfmpath - -:no_tl -echo TeX Live not found; aborting...>&2 -exit /b 1 - -:no_fontsdir -echo No place to put bitmaps; aborting...>&2 -exit /b 1 diff --git a/Master/bin/win32/psv.bat b/Master/bin/win32/psv.bat deleted file mode 100755 index bdb8ca571bf..00000000000 --- a/Master/bin/win32/psv.bat +++ /dev/null @@ -1,18 +0,0 @@ -@echo off -rem Start-up script for PS_View -rem -rem Originally written 2009 by Tomasz M. Trzeciak -rem Public Domain - -rem Make environment changes local -setlocal enableextensions -rem Get TL installation root (w/o trailing backslash) -set tlroot=%~dp0: -set tlroot=%tlroot:\bin\win32\:=% -rem Use provided GS -set GS_LIB=%tlroot%\tlpkg\tlgs\lib;%tlroot%\tlpkg\tlgs\fonts -set GS_DLL=%tlroot%\tlpkg\tlgs\bin\gsdll32.dll -rem Add bin dir to path -path %tlroot%\bin\win32;%path% -rem Start PSV and exit -start "" "%tlroot%\tlpkg\tlpsv\gswxlua.exe" -l "%tlroot%\tlpkg\tlpsv\psv.wx.lua" -p "%tlroot%\tlpkg\tlpsv\psv_view.ps" -sINPUT=%1 %2 diff --git a/Master/bin/win32/texworks.bat b/Master/bin/win32/texworks.bat deleted file mode 100755 index ad0002717e5..00000000000 --- a/Master/bin/win32/texworks.bat +++ /dev/null @@ -1,28 +0,0 @@ -@echo off -rem Start-up script for TeXworks -rem -rem Originally written 2009 by Tomasz M. Trzeciak -rem Public Domain - -setlocal enableextensions -rem Get TL installation root (w/o trailing backslash) -set TEXROOT=%~dp0: -set TEXROOT=%TEXROOT:\bin\win32\:=% -rem Add bin dir to path -path %TEXROOT%\bin\win32;%PATH% -rem Ask kpsewhich about TEXMFCONFIG location -for /f "delims=" %%I in ('call "%~dp0kpsewhich.exe" --var-value=TEXMFCONFIG') do ( - set TW_INIPATH=%%~fI\texworks - set TW_LIBPATH=%%~fI\texworks -) -rem Settings dir needs to exist or TeXworks will fall back on the registry -if not exist "%TW_INIPATH%\" mkdir "%TW_INIPATH%" -if not exist "%TW_INIPATH%\" goto :noinipath - -rem Start TeXworks editor without blocking command line -start "TeX Works" "%TEXROOT%\tlpkg\texworks\texworks.exe" %* -goto :eof - -:noinipath -echo %~nx0: could not create directory: %TW_INIPATH%>&2 -exit /b 1 -- cgit v1.2.3