summaryrefslogtreecommitdiff
path: root/systems/texlive/tlnet/tlpkg/TeXLive
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2020-02-23 03:01:01 +0000
committerNorbert Preining <norbert@preining.info>2020-02-23 03:01:01 +0000
commit0908ef0004729f1b45b8d9687656f2f92fc122ae (patch)
treeaa4649a4452d4556370dc1d72c01f5d872a7c159 /systems/texlive/tlnet/tlpkg/TeXLive
parent3549e67b13c8460a73d122fbc2eef8badd816636 (diff)
CTAN sync 202002230301
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/TeXLive')
-rw-r--r--systems/texlive/tlnet/tlpkg/TeXLive/TLCrypto.pm7
1 files changed, 5 insertions, 2 deletions
diff --git a/systems/texlive/tlnet/tlpkg/TeXLive/TLCrypto.pm b/systems/texlive/tlnet/tlpkg/TeXLive/TLCrypto.pm
index 87cff357ed..fbd7d1c7a4 100644
--- a/systems/texlive/tlnet/tlpkg/TeXLive/TLCrypto.pm
+++ b/systems/texlive/tlnet/tlpkg/TeXLive/TLCrypto.pm
@@ -1,4 +1,4 @@
-# $Id: TLCrypto.pm 53820 2020-02-17 03:23:13Z preining $
+# $Id: TLCrypto.pm 53853 2020-02-21 08:39:42Z preining $
# TeXLive::TLCrypto.pm - handle checksums and signatures.
# Copyright 2016-2020 Norbert Preining
# This file is licensed under the GNU General Public License version 2
@@ -12,7 +12,7 @@ use TeXLive::TLConfig;
use TeXLive::TLUtils qw(debug ddebug win32 which platform
conv_to_w32_path tlwarn tldie);
-my $svnrev = '$Revision: 53820 $';
+my $svnrev = '$Revision: 53853 $';
my $_modulerevision = ($svnrev =~ m/: ([0-9]+) /) ? $1 : "unknown";
sub module_revision { return $_modulerevision; }
@@ -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);
}