From 885e0aeff9e3cd98c962de1196ff41941b4197dd Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Wed, 15 Sep 2010 09:25:23 +0000 Subject: make backup of auto-removed packages git-svn-id: svn://tug.org/texlive/trunk@19740 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf/scripts/texlive/tlmgr.pl | 10 ++++++++++ 1 file changed, 10 insertions(+) (limited to 'Master') diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index 5718438d16e..36067ccb359 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -2237,6 +2237,16 @@ sub action_update { info("[$currnr/$totalnr] auto-remove: $p\n"); } if (!$opts{"dry-run"}) { + if ($opts{"backup"}) { + $pkg->make_container("xz", $root, + $opts{"backupdir"}, + "${p}.r" . $pkg->revision, + $pkg->relocated); + if ($autobackup) { + # in case we do auto backups we remove older backups + clear_old_backups($p, $opts{"backupdir"}, $autobackup); + } + } $localtlmedia->remove_package($p); logpackage("remove: $p"); } -- cgit v1.2.3