diff options
author | Norbert Preining <norbert@preining.info> | 2024-01-05 03:02:50 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2024-01-05 03:02:50 +0000 |
commit | 387961768f65ec00d171b3781d4b87ea94bb19f5 (patch) | |
tree | b3280b963f8e2b3d3f9f0b1f940912069d6f27c9 /macros/latex/contrib/l3build/l3build-upload.lua | |
parent | c45a0e15a3f74b963e3c2be142de33c8c8f12588 (diff) |
CTAN sync 202401050302
Diffstat (limited to 'macros/latex/contrib/l3build/l3build-upload.lua')
-rw-r--r-- | macros/latex/contrib/l3build/l3build-upload.lua | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/macros/latex/contrib/l3build/l3build-upload.lua b/macros/latex/contrib/l3build/l3build-upload.lua index 180572baf4..87158d1b01 100644 --- a/macros/latex/contrib/l3build/l3build-upload.lua +++ b/macros/latex/contrib/l3build/l3build-upload.lua @@ -1,6 +1,6 @@ --[[ -File l3build-upload.lua Copyright (C) 2018-2021 The LaTeX Project +File l3build-upload.lua Copyright (C) 2018-2024 The LaTeX Project It may be distributed and/or modified under the conditions of the LaTeX Project Public License (LPPL), either version 1.3c of this @@ -34,8 +34,6 @@ local popen = io.popen local read = io.read local write = io.write -local os_type = os.type - local len = string.len local lower = string.lower local match = string.match @@ -131,8 +129,8 @@ function upload(tagnames) print("Are you sure you want to continue? [y/n]" ) io.stdout:write("> "):flush() if lower(read(),1,1) ~= "y" then - print'Aborting' - return 1 + print'Aborting' + return 1 end end @@ -247,9 +245,9 @@ function shell(s) local t = assert(h:read('*a')) local success = h:close() if (success) then - return t + return t else - error("\nError from shell command:\n" .. s .. "\n" .. t .. "\n") + error("\nError from shell command:\n" .. s .. "\n" .. t .. "\n") end end @@ -358,7 +356,7 @@ function input_multi_line_field (name) if answer_line~=nil then field = field .. "\n" .. answer_line end - end + end until (return_count==3 or answer_line==nil or answer_line=='\004') return field end |