diff options
author | Norbert Preining <preining@logic.at> | 2010-06-01 05:40:45 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2010-06-01 05:40:45 +0000 |
commit | 7b2eadfec60ec5bc7ad35b7d0f42244791b56359 (patch) | |
tree | e7110c90e6ff3d71a96a0c6d905d6442721e7918 /Master | |
parent | cea9e0f017b19d18bba9a89898fcc66c2a5fae97 (diff) |
- create one spot where the default initial backup dir location is configured
$TeXLive::TLConfig::PackageBackupDir
- create package backup directory in install-tl
git-svn-id: svn://tug.org/texlive/trunk@18669 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-x | Master/install-tl | 4 | ||||
-rw-r--r-- | Master/tlpkg/TeXLive/TLConfig.pm | 6 |
2 files changed, 9 insertions, 1 deletions
diff --git a/Master/install-tl b/Master/install-tl index 3847c0c553c..0822249b1a4 100755 --- a/Master/install-tl +++ b/Master/install-tl @@ -652,6 +652,10 @@ sub do_postinst_stuff { rmtree("$TEXDIR/TeXLive::TLConfig::RelocTree/tlpkg"); } + # + # create package backup directory for tlmgr autobackup to work + mkdirhier("$TEXDIR/$TeXLive::TLConfig::PackageBackupDir"); + # final program execution # we have to do several things: # - clean the environment from spurious TEXMF related variables diff --git a/Master/tlpkg/TeXLive/TLConfig.pm b/Master/tlpkg/TeXLive/TLConfig.pm index 315c88d5517..02d9dbc75c2 100644 --- a/Master/tlpkg/TeXLive/TLConfig.pm +++ b/Master/tlpkg/TeXLive/TLConfig.pm @@ -33,6 +33,7 @@ BEGIN { $DefaultContainerExtension $InfraLocation $DatabaseName + $PackageBackupDir $BlockSize $Archive $TeXLiveServerURL @@ -74,6 +75,9 @@ our $DefaultCategory = "Package"; our $InfraLocation = "tlpkg"; our $DatabaseName = "texlive.tlpdb"; +# location of backups in default autobackup setting +our $PackageBackupDir = "$InfraLocation/package-backups"; + our $BlockSize = 4096; our $Archive = "archive"; @@ -129,7 +133,7 @@ our %TLPDBOptions = ( [ "n:-1..", 1, "autobackup", "Number of backups to keep" ], "backupdir" => - [ "p", "tlpkg/package-backups", "backupdir", + [ "p", $PackageBackupDir, "backupdir", "Directory for backups" ], "create_formats" => [ "b", 1, "formats", |