diff options
| -rw-r--r-- | Build/source/texk/texlive/linked_scripts/ctanupload/ctanupload.pl | 1 | ||||
| -rwxr-xr-x | Master/texmf-dist/scripts/ctanupload/ctanupload.pl | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/Build/source/texk/texlive/linked_scripts/ctanupload/ctanupload.pl b/Build/source/texk/texlive/linked_scripts/ctanupload/ctanupload.pl index 4c3939b3440..a365e7fd47a 100644 --- a/Build/source/texk/texlive/linked_scripts/ctanupload/ctanupload.pl +++ b/Build/source/texk/texlive/linked_scripts/ctanupload/ctanupload.pl @@ -442,6 +442,7 @@ eval { print @response[3..$#response-3]; local $, = "\n# "; print LOG '', @response[3..$#response-3] if $LOG; + 1; } or do { print "Can't display HTML response, storing reponse if log file 'ctanupload_response.html'\n"; open (HLOG, '>', 'ctanupload_response.html'); diff --git a/Master/texmf-dist/scripts/ctanupload/ctanupload.pl b/Master/texmf-dist/scripts/ctanupload/ctanupload.pl index 4c3939b3440..a365e7fd47a 100755 --- a/Master/texmf-dist/scripts/ctanupload/ctanupload.pl +++ b/Master/texmf-dist/scripts/ctanupload/ctanupload.pl @@ -442,6 +442,7 @@ eval { print @response[3..$#response-3]; local $, = "\n# "; print LOG '', @response[3..$#response-3] if $LOG; + 1; } or do { print "Can't display HTML response, storing reponse if log file 'ctanupload_response.html'\n"; open (HLOG, '>', 'ctanupload_response.html'); |