summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/l3build/l3build-upload.lua
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/l3build/l3build-upload.lua')
-rw-r--r--macros/latex/contrib/l3build/l3build-upload.lua15
1 files changed, 12 insertions, 3 deletions
diff --git a/macros/latex/contrib/l3build/l3build-upload.lua b/macros/latex/contrib/l3build/l3build-upload.lua
index fc25d5d6ac..ba74309492 100644
--- a/macros/latex/contrib/l3build/l3build-upload.lua
+++ b/macros/latex/contrib/l3build/l3build-upload.lua
@@ -163,14 +163,19 @@ end
fp_return = shell(ctan_post .. "validate")
end
end
- if match(fp_return,"WARNING") or match(fp_return,"ERROR") then
+ if (match(fp_return,"ERROR")) then
exit_status=1
end
-- if upload requested and validation succeeded repost to the upload URL
if (exit_status==0 or exit_status==nil) then
if (ctanupload ~=nil and ctanupload ~=false and ctanupload ~= true) then
- print("Validation successful, do you want to upload to CTAN? [y/n]" )
+ if (match(fp_return,"WARNING")) then
+ print("Warnings from CTAN package validation:" .. fp_return:gsub("%[","\n["):gsub("%]%]","]\n]"))
+ else
+ print("Validation successful." )
+ end
+ print("Do you want to upload to CTAN? [y/n]" )
local answer=""
io.stdout:write("> ")
io.stdout:flush()
@@ -189,7 +194,11 @@ end
exit_status=1
end
else
- print("CTAN validation successful")
+ if (match(fp_return,"WARNING")) then
+ print("Warnings from CTAN package validation:" .. fp_return:gsub("%[","\n["):gsub("%]%]","]\n]"))
+ else
+ print("CTAN validation successful")
+ end
end
else
error("Warnings from CTAN package validation:\n" .. fp_return)