summaryrefslogtreecommitdiff
path: root/Master/tlpkg
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2020-02-21 08:39:42 +0000
committerNorbert Preining <preining@logic.at>2020-02-21 08:39:42 +0000
commit3c0004552a5088ae03cbd0cfeffad14049413ce2 (patch)
tree866803579cf92724774db772345cbbe25b44ad68 /Master/tlpkg
parent046857098b551d2b6fb1ebb301f7b780587011bc (diff)
fix missing return values on checksum error
git-svn-id: svn://tug.org/texlive/trunk@53853 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rw-r--r--Master/tlpkg/TeXLive/TLCrypto.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/Master/tlpkg/TeXLive/TLCrypto.pm b/Master/tlpkg/TeXLive/TLCrypto.pm
index 6027885c1c9..4554da030a9 100644
--- a/Master/tlpkg/TeXLive/TLCrypto.pm
+++ b/Master/tlpkg/TeXLive/TLCrypto.pm
@@ -247,6 +247,7 @@ sub verify_checksum_and_check_return {
if (!$localcopymode) {
tldie("$0: checksum error when downloading $file from $path: $m\n");
}
+ return(0, $r);
} elsif ($r == $VS_SIGNATURE_ERROR) {
tldie("$0: signature verification error of $file from $path: $m\n");
} elsif ($r == $VS_CONNECTION_ERROR) {
@@ -278,6 +279,8 @@ sub verify_checksum_and_check_return {
} else {
tldie("$0: unexpected return value from verify_checksum: $r\n");
}
+ # we should never come here, but just to be sure
+ return(0, $r);
}