bat wrappers not needed for gui stubs

git-svn-id: svn://tug.org/texlive/trunk@17284 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 0 insertions, 80 deletions

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