summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/TeXLive')
-rw-r--r--Master/tlpkg/TeXLive/TLConfig.pm3
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm6
2 files changed, 6 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLConfig.pm b/Master/tlpkg/TeXLive/TLConfig.pm
index 1242ce98b30..27bafd41df5 100644
--- a/Master/tlpkg/TeXLive/TLConfig.pm
+++ b/Master/tlpkg/TeXLive/TLConfig.pm
@@ -52,6 +52,7 @@ BEGIN {
$F_OK $F_WARNING $F_ERROR $F_NOPOSTACTION
$ChecksumLength
$ChecksumProgram
+ $ChecksumExtension
);
@EXPORT = @EXPORT_OK;
}
@@ -224,6 +225,8 @@ $ChecksumLength = 128;
# argument
$ChecksumProgram = "sha512sum";
+# The extension of the checksum file
+$ChecksumExtension = "sha512";
1;
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 115b98cb6dd..72c01ef7713 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -3747,8 +3747,8 @@ sub download_to_temp_or_file {
=item C<< verify_download($file, $url) >>
-Verifies a download of C<$url> into C<$file> by checking C<$url.checksum>
-and if gpg is available, verifying that with C<$url.checksum.asc>.
+Verifies a download of C<$url> into C<$file> by checking C<$url.sha512>
+and if gpg is available, verifying that with C<$url.sha512.asc>.
Returns 0 on success, -1 on connection error, 1 on checksum error.
In case of errors returns an informal message as second argument.
@@ -3758,7 +3758,7 @@ In case of errors returns an informal message as second argument.
sub verify_download {
my ($file, $url) = @_;
# download checksum file
- my $checksum_url = "$url.checksum";
+ my $checksum_url = "$url.$TeXLive::TLConfig::ChecksumExtension";
my $signature_url = "$checksum_url.asc";
my $checksum_file = download_to_temp_or_file($checksum_url);