From 8b71ba174113bdcdd8ef8e09aa0905fdd9f2272a Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Fri, 8 Feb 2008 10:26:14 +0000 Subject: use os.type from latest texlua git-svn-id: svn://tug.org/texlive/trunk@6544 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/texlive/generate-fmtutil | 9 +++------ Build/source/texk/texlive/generate-language | 9 +++------ Build/source/texk/texlive/generate-updmap | 9 +++------ 3 files changed, 9 insertions(+), 18 deletions(-) (limited to 'Build/source/texk') diff --git a/Build/source/texk/texlive/generate-fmtutil b/Build/source/texk/texlive/generate-fmtutil index 1089cd2d921..85bd03814ff 100755 --- a/Build/source/texk/texlive/generate-fmtutil +++ b/Build/source/texk/texlive/generate-fmtutil @@ -25,13 +25,10 @@ kpse.set_program_name(basename) TEXDIR=kpse.var_value("SELFAUTOPARENT") -- if we are on win32 we have to use the shipped perl -ostype = os.getenv("OS") perlbin="perl" -if (ostype) then - if string.find(ostype, "Windows") then - os.setenv("PERL5LIB", TEXDIR.."/tlpkg/tlperl/lib") - perlbin=TEXDIR.."/tlpkg/tlperl/bin/perl.exe" - end +if (os.type == "windows") then + os.setenv("PERL5LIB", TEXDIR.."/tlpkg/tlperl/lib") + perlbin=TEXDIR.."/tlpkg/tlperl/bin/perl.exe" end script=kpse.find_file(basename..".pl", "texmfscripts") diff --git a/Build/source/texk/texlive/generate-language b/Build/source/texk/texlive/generate-language index b2013a3c8ca..16f80abaf06 100755 --- a/Build/source/texk/texlive/generate-language +++ b/Build/source/texk/texlive/generate-language @@ -25,13 +25,10 @@ kpse.set_program_name(basename) TEXDIR=kpse.var_value("SELFAUTOPARENT") -- if we are on win32 we have to use the shipped perl -ostype = os.getenv("OS") perlbin="perl" -if (ostype) then - if string.find(ostype, "Windows") then - os.setenv("PERL5LIB", TEXDIR.."/tlpkg/tlperl/lib") - perlbin=TEXDIR.."/tlpkg/tlperl/bin/perl.exe" - end +if (os.type == "windows") then + os.setenv("PERL5LIB", TEXDIR.."/tlpkg/tlperl/lib") + perlbin=TEXDIR.."/tlpkg/tlperl/bin/perl.exe" end script=kpse.find_file(basename..".pl", "texmfscripts") diff --git a/Build/source/texk/texlive/generate-updmap b/Build/source/texk/texlive/generate-updmap index 30549144271..ce6ca0ec093 100755 --- a/Build/source/texk/texlive/generate-updmap +++ b/Build/source/texk/texlive/generate-updmap @@ -25,13 +25,10 @@ kpse.set_program_name(basename) TEXDIR=kpse.var_value("SELFAUTOPARENT") -- if we are on win32 we have to use the shipped perl -ostype = os.getenv("OS") perlbin="perl" -if (ostype) then - if string.find(ostype, "Windows") then - os.setenv("PERL5LIB", TEXDIR.."/tlpkg/tlperl/lib") - perlbin=TEXDIR.."/tlpkg/tlperl/bin/perl.exe" - end +if (os.type == "windows") then + os.setenv("PERL5LIB", TEXDIR.."/tlpkg/tlperl/lib") + perlbin=TEXDIR.."/tlpkg/tlperl/bin/perl.exe" end script=kpse.find_file(basename..".pl", "texmfscripts") -- cgit v1.2.3