diff options
author | Karl Berry <karl@freefriends.org> | 2022-02-24 20:54:22 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2022-02-24 20:54:22 +0000 |
commit | a376a4dd47279e493eb5c5b3130ccf92598b1504 (patch) | |
tree | 03a24e342883e6d4572f02dd3dfb6c08f78fe721 /Master/texmf-dist/scripts/l3build/l3build-upload.lua | |
parent | 9b56d03fb7b3241bc831b04e814e4f4b0218efe7 (diff) |
l3 (24feb22)
git-svn-id: svn://tug.org/texlive/trunk@62165 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/scripts/l3build/l3build-upload.lua')
-rw-r--r-- | Master/texmf-dist/scripts/l3build/l3build-upload.lua | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/Master/texmf-dist/scripts/l3build/l3build-upload.lua b/Master/texmf-dist/scripts/l3build/l3build-upload.lua index 4b3aa7aea61..d6328d62fe3 100644 --- a/Master/texmf-dist/scripts/l3build/l3build-upload.lua +++ b/Master/texmf-dist/scripts/l3build/l3build-upload.lua @@ -245,8 +245,12 @@ end function shell(s) local h = assert(popen(s, 'r')) local t = assert(h:read('*a')) - h:close() - return t + local success = h:close() + if (success) then + return t + else + error("\nError from shell command:\n" .. s .. "\n" .. t .. "\n") + end end function construct_ctan_post(uploadfile,debug) @@ -324,7 +328,7 @@ function ctan_single_field(fname,fvalue,max,desc,mandatory) vs = vs:gsub('`','\\`') vs = vs:gsub('\n','\\n') -- for strings on commandline version ctan_post=ctan_post .. ' --form "' .. fname .. "=" .. vs .. '"' - ctan_post=ctan_post .. '\nform="' .. fname .. '=' .. vs .. '"' + ctan_post=ctan_post .. '\nform-string="' .. fname .. '=' .. vs .. '"' end else error("The value of the field '" .. fname .."' must be a scalar not a table") |