From 3c0004552a5088ae03cbd0cfeffad14049413ce2 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Fri, 21 Feb 2020 08:39:42 +0000 Subject: fix missing return values on checksum error git-svn-id: svn://tug.org/texlive/trunk@53853 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLCrypto.pm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'Master/tlpkg/TeXLive') 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); } -- cgit v1.2.3