diff options
author | Karl Berry <karl@freefriends.org> | 2019-12-11 23:09:43 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2019-12-11 23:09:43 +0000 |
commit | ddb7e4fedf257946fe9ff464849ddd8a9c30854c (patch) | |
tree | 47278ccd5ce227649755321ae0026637bdab254e /Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl | |
parent | 78e912c354fd91abbfb6fe9ba6f869449dab2391 (diff) |
doc,sync
git-svn-id: svn://tug.org/texlive/trunk@53100 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl')
-rwxr-xr-x | Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl | 15 |
1 files changed, 6 insertions, 9 deletions
diff --git a/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl b/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl index 9d5e8be2cb1..d2578410c46 100755 --- a/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl +++ b/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl @@ -1,12 +1,12 @@ #!/usr/bin/env perl -# $Id: tlmgr.pl 52931 2019-11-26 23:04:18Z karl $ +# $Id: tlmgr.pl 53076 2019-12-10 06:20:44Z preining $ # # Copyright 2008-2019 Norbert Preining # This file is licensed under the GNU General Public License version 2 # or any later version. -my $svnrev = '$Revision: 52931 $'; -my $datrev = '$Date: 2019-11-27 00:04:18 +0100 (Wed, 27 Nov 2019) $'; +my $svnrev = '$Revision: 53076 $'; +my $datrev = '$Date: 2019-12-10 07:20:44 +0100 (Tue, 10 Dec 2019) $'; my $tlmgrrevision; my $tlmgrversion; my $prg; @@ -1096,7 +1096,6 @@ sub backup_and_remove_package { if ($opts{"backup"}) { $tlp->make_container($::progs{'compressor'}, $localtlpdb->root, destdir => $opts{"backupdir"}, - containername => "${pkg}.r" . $tlp->revision, relative => $tlp->relocated, user => 1); if ($autobackup) { @@ -2168,7 +2167,6 @@ sub action_backup { if (!$opts{"dry-run"}) { $tlp->make_container($::progs{'compressor'}, $localtlpdb->root, destdir => $opts{"backupdir"}, - containername => "${pkg}.r" . $tlp->revision, user => 1); } } @@ -2288,7 +2286,7 @@ sub write_w32_updater { # some-name.r[0-9]+ my ($size, undef, $fullname) = $localtlp->make_container("tar", $root, destdir => $temp, - containername => "__BACKUP_$pkg.r$oldrev", + containername => "__BACKUP_$pkg", user => 1); if ($size <= 0) { tlwarn("$prg: creation of backup container failed for: $pkg\n"); @@ -3210,7 +3208,6 @@ sub action_update { my $compressorextension = $Compressors{$::progs{'compressor'}}{'extension'}; $tlp->make_container($::progs{'compressor'}, $root, destdir => $opts{"backupdir"}, - containername => "${pkg}.r" . $tlp->revision, relative => $tlp->relocated, user => 1); $unwind_package = @@ -3252,7 +3249,7 @@ sub action_update { my $tlp = $localtlpdb->get_package($pkg); my ($s, undef, $fullname) = $tlp->make_container("tar", $root, destdir => $temp, - containername => "__BACKUP_${pkg}.r" . $tlp->revision, + containername => "__BACKUP_${pkg}", relative => $tlp->relocated, user => 1); if ($s <= 0) { @@ -9963,7 +9960,7 @@ This script and its documentation were written for the TeX Live distribution (L<https://tug.org/texlive>) and both are licensed under the GNU General Public License Version 2 or later. -$Id: tlmgr.pl 52931 2019-11-26 23:04:18Z karl $ +$Id: tlmgr.pl 53076 2019-12-10 06:20:44Z preining $ =cut # test HTML version: pod2html --cachedir=/tmp tlmgr.pl >/tmp/tlmgr.html |