diff options
| author | Norbert Preining <preining@logic.at> | 2016-04-12 06:08:38 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2016-04-12 06:08:38 +0000 |
| commit | 8cbeaa42bb24221d95e96b6547820b6616efad11 (patch) | |
| tree | 809d7aa2351ab49fcc4fcca6854f4a4436aeed67 /Master/tlpkg/TeXLive/TLPDB.pm | |
| parent | 24cd1b27bf8774ebc861f9c32c594d603218ef5a (diff) | |
work on gpg verification function
git-svn-id: svn://tug.org/texlive/trunk@40435 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPDB.pm')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLPDB.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm index b625fc7c65d..3bb5801f623 100644 --- a/Master/tlpkg/TeXLive/TLPDB.pm +++ b/Master/tlpkg/TeXLive/TLPDB.pm @@ -341,6 +341,11 @@ sub from_file { unlink($tlpdbfile); } else { unlink($xzfile); + # verify checksum + # TODO TODO TODO VERIFY + # either here, but we need to do the same alos 10lines down + # there when downloading the tlpdb file directly into a pipe!!! + #TeXLive::TLUtils::verify_download($tlpdbfile, $path); open($retfh, "<$tlpdbfile") || die "$0: open($tlpdbfile) failed: $!"; debug("found the uncompressed xz file\n"); } |