summaryrefslogtreecommitdiff
path: root/Master/texmf
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-04-17 08:50:52 +0000
committerNorbert Preining <preining@logic.at>2008-04-17 08:50:52 +0000
commit879ffd96ec3bdc67834400d7537e8e75754077e7 (patch)
treebab5b6e43761f0a7f2c49bd8e22ef525c10d6746 /Master/texmf
parent31774a928820b9ede1b2624558c3dc725d8985fc (diff)
add an option to change the default location
tlmgr default location http://.... git-svn-id: svn://tug.org/texlive/trunk@7467 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf')
-rwxr-xr-xMaster/texmf/scripts/texlive/tl-package-manager.pl19
1 files changed, 19 insertions, 0 deletions
diff --git a/Master/texmf/scripts/texlive/tl-package-manager.pl b/Master/texmf/scripts/texlive/tl-package-manager.pl
index 0fda2b2f1c6..44467737210 100755
--- a/Master/texmf/scripts/texlive/tl-package-manager.pl
+++ b/Master/texmf/scripts/texlive/tl-package-manager.pl
@@ -11,6 +11,11 @@
# - (?) removal does not remove created format files from TEXMFSYSVAR
# - other features: dependency check?, ...?
# - improve search function
+# - list_archs and add_arch
+# - cmd
+# default <key> <value>
+# sets the options in texlive.tlpdb
+# done for location
my $Master;
@@ -130,6 +135,20 @@ if ($action =~ m/^generate$/i) {
}
# should we do some postinst actions?
exit(0);
+} elsif ($action =~ m/^default$/i) {
+ my $what = shift;
+ die("default needs at least one argument") unless defined($what);
+ if ($what =~ m/^location$/i) {
+ # changes the default location
+ my $loc = shift;
+ die("defaultlocation needs an argument") unless defined($loc);
+ print "Setting default location to $loc!\n";
+ $localtlpdb->option_location($loc);
+ $localtlpdb->save;
+ } else {
+ warn "Setting other options currently not support, please edit texlive.tlpdb!";
+ }
+ exit(0);
} elsif ($action =~ m/^list$/i) {
my $what = shift;
if ($what =~ m/^collection/i) {