diff options
Diffstat (limited to 'Master/bin/win32/fmtutil-sys.texlua')
-rwxr-xr-x | Master/bin/win32/fmtutil-sys.texlua | 40 |
1 files changed, 40 insertions, 0 deletions
diff --git a/Master/bin/win32/fmtutil-sys.texlua b/Master/bin/win32/fmtutil-sys.texlua new file mode 100755 index 00000000000..3b2032a15bc --- /dev/null +++ b/Master/bin/win32/fmtutil-sys.texlua @@ -0,0 +1,40 @@ +#!/xusr/bin/env texlua +--*-Lua-*- +-- $Id: fmtutil-sys.texlua 6607 2008-02-11 15:37:39Z siepo $ + +-- Copyright (C) 2008 Reinhard Kotucha, Norbert Preining +-- You may freely use, modify and/or distribute this file. + +-- Wrapper for Perl scripts. + + +if string.find(arg[0], "/") then -- UNIX path + filename=select(1, string.gsub(arg[0], ".*/", "")) +elseif string.find(arg[0], "\\") then -- Windows path + filename=select(1, string.gsub(arg[0], ".*\\", "")) +else -- no path + filename=arg[0] +end + +basename=select(1, string.gsub(filename, "\.texlua$", "")) + +-- basename="fmtutil-sys" + +kpse.set_program_name(filename) + +if string.find(basename, "-sys$") then + basename=select(1, string.gsub(basename, "-sys$", "")) + os.setenv("TEXMFVAR", kpse.var_value("TEXMFSYSVAR")) + os.setenv("TEXMFCONFIG", kpse.var_value("TEXMFSYSCONFIG")) +end + +command[0] = "fmtutil" +command[1] = "fmtutil" + +for i=1, #arg do + command[#command+1]=arg[i] +end + +ret=os.spawn(command) +os.exit(ret) + |