diff options
Diffstat (limited to 'Master/texmf-dist/tex/latex/l3build/l3build-unpack.lua')
-rw-r--r-- | Master/texmf-dist/tex/latex/l3build/l3build-unpack.lua | 99 |
1 files changed, 0 insertions, 99 deletions
diff --git a/Master/texmf-dist/tex/latex/l3build/l3build-unpack.lua b/Master/texmf-dist/tex/latex/l3build/l3build-unpack.lua deleted file mode 100644 index 9779502c2fc..00000000000 --- a/Master/texmf-dist/tex/latex/l3build/l3build-unpack.lua +++ /dev/null @@ -1,99 +0,0 @@ ---[[ - -File l3build-unpack.lua Copyright (C) 2018 The LaTeX3 Project - -It may be distributed and/or modified under the conditions of the -LaTeX Project Public License (LPPL), either version 1.3c of this -license or (at your option) any later version. The latest version -of this license is in the file - - http://www.latex-project.org/lppl.txt - -This file is part of the "l3build bundle" (The Work in LPPL) -and all files in that bundle must be distributed together. - ------------------------------------------------------------------------ - -The development version of the bundle can be found at - - https://github.com/latex3/l3build - -for those people who are interested. - ---]] - -local execute = os.execute - --- Unpack the package files using an 'isolated' system: this requires --- a copy of the 'basic' DocStrip program, which is used then removed -function unpack(sources, sourcedirs) - local errorlevel = depinstall(unpackdeps) - if errorlevel ~= 0 then - return errorlevel - end - errorlevel = bundleunpack(sourcedirs, sources) - if errorlevel ~= 0 then - return errorlevel - end - for _,i in ipairs(installfiles) do - errorlevel = cp(i, unpackdir, localdir) - if errorlevel ~= 0 then - return errorlevel - end - end - return 0 -end - --- Split off from the main unpack so it can be used on a bundle and not --- leave only one modules files -bundleunpack = bundleunpack or function(sourcedirs, sources) - local errorlevel = mkdir(localdir) - if errorlevel ~=0 then - return errorlevel - end - errorlevel = cleandir(unpackdir) - if errorlevel ~=0 then - return errorlevel - end - for _,i in ipairs(sourcedirs or {sourcefiledir}) do - for _,j in ipairs(sources or {sourcefiles}) do - for _,k in ipairs(j) do - errorlevel = cp(k, i, unpackdir) - if errorlevel ~=0 then - return errorlevel - end - end - end - end - for _,i in ipairs(unpacksuppfiles) do - errorlevel = cp(i, supportdir, localdir) - if errorlevel ~=0 then - return errorlevel - end - end - for _,i in ipairs(unpackfiles) do - for j,_ in pairs(tree(unpackdir, i)) do - -- This 'yes' business is needed to pass a series of "y\n" to - -- TeX if \askforoverwrite is true - -- That is all done using a file as it's the only way on Windows and - -- on Unix the "yes" command can't be used inside execute (it never - -- stops, which confuses Lua) - execute(os_yes .. ">>" .. localdir .. "/yes") - local path, name = splitpath(j) - local localdir = abspath(localdir) - errorlevel = run( - unpackdir .. "/" .. path, - os_setenv .. " TEXINPUTS=." .. os_pathsep - .. localdir .. (unpacksearch and os_pathsep or "") .. - os_concat .. - unpackexe .. " " .. unpackopts .. " " .. name .. " < " - .. localdir .. "/yes" - .. (options["quiet"] and (" > " .. os_null) or "") - ) - if errorlevel ~=0 then - return errorlevel - end - end - end - return 0 -end |