summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2008-08-21 16:50:32 +0000
committerKarl Berry <karl@freefriends.org>2008-08-21 16:50:32 +0000
commit4ab0e098ab15e8dcaeef87533f1481400a7b323a (patch)
treed01324f35967540d6010586c0e1628da679c3842
parent39c48d617f828e8284bab29afce55737c45254aa (diff)
consistently use . not _ for backup revs (from Norbert)
git-svn-id: svn://tug.org/texlive/trunk@10392 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-xMaster/texmf/scripts/texlive/tlmgr.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl
index 9cf7110194f..aad5f6e9d8d 100755
--- a/Master/texmf/scripts/texlive/tlmgr.pl
+++ b/Master/texmf/scripts/texlive/tlmgr.pl
@@ -537,7 +537,7 @@ sub action_restore {
exit(0);
}
}
- print "Restoring $pkg, $rev from $opt_backupdir/${pkg}_r${rev}.tar.lzma\n";
+ print "Restoring $pkg, $rev from $opt_backupdir/${pkg}.r${rev}.tar.lzma\n";
if (!$opt_dry) {
init_local_db(1);
# first remove the package, then reinstall it
@@ -545,7 +545,7 @@ sub action_restore {
# force the deinstallation since we will reinstall it
$opt_backupdir = abs_path($opt_backupdir);
merge_into(\%ret, &remove_package($pkg, $localtlpdb, 1));
- TeXLive::TLMedia->_install_package("$opt_backupdir/${pkg}_r${rev}.tar.lzma" , [] ,$localtlpdb);
+ TeXLive::TLMedia->_install_package("$opt_backupdir/${pkg}.r${rev}.tar.lzma" , [] ,$localtlpdb);
# now we have to read the .tlpobj file and add it to the DB
my $tlpobj = TeXLive::TLPOBJ->new;
$tlpobj->from_file($localtlpdb->root . "/tlpkg/tlpobj/$pkg.tlpobj");