summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2010-06-04 14:06:37 +0000
committerNorbert Preining <preining@logic.at>2010-06-04 14:06:37 +0000
commit523bbb55c8eaa157834d8b3f94a791c320fd6705 (patch)
tree9f15abd34e19f96adcac5c0d076b452460ce37ff /Master
parentdf4ff1aa4d1ed2bd2beab1ada5f8a3ae1756d517 (diff)
tlmgr: make backup message a log for each package, and inform only once
in the beginning (actually make it from debug to info) git-svn-id: svn://tug.org/texlive/trunk@18722 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-xMaster/texmf/scripts/texlive/tlmgr.pl5
1 files changed, 3 insertions, 2 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl
index cc2bfe5efa4..23e9f6c609f 100755
--- a/Master/texmf/scripts/texlive/tlmgr.pl
+++ b/Master/texmf/scripts/texlive/tlmgr.pl
@@ -1904,7 +1904,8 @@ sub action_update {
# finally, if we have --backupdir, but no --backup, just enable it
$opts{"backup"} = 1 if $opts{"backupdir"};
- debug("Doing backups to $opts{'backupdir'}\n") if $opts{"backup"};
+ info("Saving backups to $opts{'backupdir'}\n") if
+ ($opts{"backup"} && !$::machinereadable);
# these two variables are used throughout this function
my $root = $localtlpdb->root;
@@ -4495,7 +4496,7 @@ sub clear_old_backups
my $i = 1;
for my $e (reverse sort {$a <=> $b} @backups) {
if ($i > $autobackup) {
- info ("Removing backup $backupdir/$pkg.r$e.tar.xz\n");
+ log ("Removing backup $backupdir/$pkg.r$e.tar.xz\n");
unlink("$backupdir/$pkg.r$e.tar.xz") unless $dryrun;
}
$i++;