summaryrefslogtreecommitdiff
path: root/Master/bin/win32
diff options
context:
space:
mode:
authorReinhard Kotucha <reinhard.kotucha@web.de>2008-03-19 21:52:43 +0000
committerReinhard Kotucha <reinhard.kotucha@web.de>2008-03-19 21:52:43 +0000
commit6a6e432652d5605651b0f2b530d2b8659618e7d4 (patch)
tree474e743886fcd9d90cfbfe57e69d625547dcae37 /Master/bin/win32
parentd595c6bc024a66ae47117e6568b53427060857b4 (diff)
fmtutil-sys.texlua: bug fixed, py, rb, lua, and texlua support removed.
Can be added when needed. git-svn-id: svn://tug.org/texlive/trunk@7030 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/bin/win32')
-rwxr-xr-xMaster/bin/win32/fmtutil-sys.texlua29
1 files changed, 12 insertions, 17 deletions
diff --git a/Master/bin/win32/fmtutil-sys.texlua b/Master/bin/win32/fmtutil-sys.texlua
index 33a2d8cc1c4..ddf32fbd1e7 100755
--- a/Master/bin/win32/fmtutil-sys.texlua
+++ b/Master/bin/win32/fmtutil-sys.texlua
@@ -41,6 +41,8 @@ kpse.set_program_name(filename, basename)
TEXDIR=kpse.var_value('SELFAUTOPARENT')
BINDIR=kpse.var_value('SELFAUTOLOC')
+perlbin=TEXDIR..'/tlpkg/tlperl/bin/perl.exe'
+
os.setenv('PERL5LIB', TEXDIR..'/tlpkg/tlperl/lib')
os.setenv('GS_LIB', TEXDIR..'/tlpkg/tlgs/lib')
os.setenv('PATH', TEXDIR..'/tlpkg/tlgs/bin;'..os.getenv('PATH'))
@@ -55,29 +57,15 @@ if sys and lfs.isfile(BINDIR..'/'..basename..'.exe') then
command={BINDIR..'/'..basename..'.exe'}
elseif lfs.isfile(BINDIR..'/'..basename..'-bin.exe') then
command={BINDIR..'/'..basename..'-bin.exe'}
-elseif lfs.isdir(BINDIR..'/'..basename..'.pl') then
- perlbin=TEXDIR..'/tlpkg/tlperl/bin/perl.exe'
+elseif lfs.isfile(BINDIR..'/'..basename..'.pl') then
script=BINDIR..'/'..basename..'.pl'
command={perlbin, script}
elseif kpse.find_file(basename..'.pl', 'texmfscripts') then
- perlbin=TEXDIR..'/tlpkg/tlperl/bin/perl.exe'
script=kpse.find_file(basename..'.pl', 'texmfscripts')
command={perlbin, script}
-elseif kpse.find_file(basename..'.rb', 'texmfscripts') then
- script=kpse.find_file(basename..'.rb', 'texmfscripts')
- command={'ruby', script}
-elseif kpse.find_file(basename..'.py', 'texmfscripts') then
- script=kpse.find_file(basename..'.py', 'texmfscripts')
- command={'python', script}
-elseif kpse.find_file(basename..'.texlua', 'texmfscripts') then
- script=kpse.find_file(basename..'.texlua', 'texmfscripts')
- command={'texlua', script}
-elseif kpse.find_file(basename..'.lua', 'texmfscripts') then
- script=kpse.find_file(basename..'.lua', 'texmfscripts')
- command={'texlua', script}
else
- os.stderr:write(filename..'.texlua: No interpreter found for '..
- basename..'\n')
+ io.stderr:write(filename..'.texlua: '..basename..
+ ': No appropriate script found.\n')
end
for i=1, #arg do
@@ -86,5 +74,12 @@ end
command=fixwin(command)
+--[[ Prepend an additional hyphen to activate this code.
+for i=0, #command do
+ print (command[i])
+end
+os.exit(ret)
+--]]
+
ret=os.spawn(command)
os.exit(ret)