texlive[43981] Master/install-tl: (-init-from-profile): rename from
commits+karl at tug.org
commits+karl at tug.org
Sun Apr 23 00:35:55 CEST 2017
Revision: 43981
http://tug.org/svn/texlive?view=revision&revision=43981
Author: karl
Date: 2017-04-23 00:35:55 +0200 (Sun, 23 Apr 2017)
Log Message:
-----------
(-init-from-profile): rename from
-profile-seed. Alphabetize option lists.
Modified Paths:
--------------
trunk/Master/install-tl
Modified: trunk/Master/install-tl
===================================================================
--- trunk/Master/install-tl 2017-04-22 22:28:50 UTC (rev 43980)
+++ trunk/Master/install-tl 2017-04-22 22:35:55 UTC (rev 43981)
@@ -161,26 +161,27 @@
);
# option handling
-our $opt_in_place = 0;
+my $opt_allow_ftp = 0;
+my $opt_custom_bin;
+my $opt_force_arch;
my $opt_gui = (win32() ? "wizard" : "text");
my $opt_help = 0;
+my $opt_init_from_profile = "";
my $opt_location = "";
my $opt_no_gui = 0;
my $opt_nonadmin = 0;
+my $opt_persistent_downloads = 1;
my $opt_portable = 0;
my $opt_print_arch = 0;
-my $opt_profileseed = "";
my $opt_profile = "";
my $opt_scheme = "";
-my $opt_custom_bin;
my $opt_version = 0;
-my $opt_force_arch;
-my $opt_persistent_downloads = 1;
-my $opt_allow_ftp = 0;
+my $opt_warn_checksums = 1;
+# unusual cases:
+$::opt_select_repository = 0;
+our $opt_in_place = 0;
# don't set this to a value, see below
my $opt_verify_downloads;
-$::opt_select_repository = 0;
-my $opt_warn_checksums = 1;
# show all options even those not relevant for that arch
$::opt_all_options = 0;
@@ -219,24 +220,24 @@
process_logging_options();
# now the others
GetOptions(
+ "all-options" => \$::opt_all_options,
"custom-bin=s" => \$opt_custom_bin,
+ "debug-translation" => \$::debug_translation,
"fancyselector" => \$::alternative_selector,
+ "force-platform|force-arch=s" => \$opt_force_arch,
+ "gui:s" => \$opt_gui,
"in-place" => \$opt_in_place,
- "gui:s" => \$opt_gui,
+ "init-from-profile=s" => \$opt_init_from_profile,
"lang=s" => \$::opt_lang,
"location|url|repository|repos|repo=s" => \$opt_location,
"no-cls", # $::opt_no_cls in install-menu-text-pl
"no-gui" => \$opt_no_gui,
"non-admin" => \$opt_nonadmin,
+ "persistent-downloads!" => \$opt_persistent_downloads,
"portable" => \$opt_portable,
"print-platform|print-arch" => \$opt_print_arch,
- "force-platform|force-arch=s" => \$opt_force_arch,
- "debug-translation" => \$::debug_translation,
- "profile-seed=s" => \$opt_profileseed,
"profile=s" => \$opt_profile,
"scheme=s" => \$opt_scheme,
- "all-options" => \$::opt_all_options,
- "persistent-downloads!" => \$opt_persistent_downloads,
"select-repository" => \$::opt_select_repository,
"verify-downloads!" => \$opt_verify_downloads,
"version" => \$opt_version,
@@ -304,8 +305,8 @@
die "$0: Options profile and in-place are incompatible.\n"
if ($opt_in_place && $opt_profile);
-die "$0: Options profile-seed and in-place are incompatible.\n"
- if ($opt_in_place && $opt_profileseed);
+die "$0: Options init-from-profile and in-place are incompatible.\n"
+ if ($opt_in_place && $opt_init_from_profile);
if ($#ARGV >= 0) {
# we still have arguments left, should only be gui, otherwise die
@@ -489,8 +490,8 @@
if ($opt_profile eq "") {
- if ($opt_profileseed) {
- read_profile("$opt_profileseed", seed => 1);
+ if ($opt_init_from_profile) {
+ read_profile("$opt_init_from_profile", seed => 1);
}
# do the normal interactive installation.
#
@@ -1640,7 +1641,7 @@
if $do_die;
}
# set the defaults to what is specified in the tlpdb
- # since we might have loaded values via a -profile-seed,
+ # since we might have loaded values via -init-from-profile,
# make sure that we don't overwrite default values
for my $o (keys %TeXLive::TLConfig::TLPDBOptions) {
$vars{"tlpdbopt_$o"} = $tlpdb->option($o)
@@ -2744,10 +2745,10 @@
=back
-=item B<-profile-seed> I<profile>
+=item B<-init-from-profile> I<profile>
-Like B<-profile>, but only seeds the installation configuration
-before starting the interactive session.
+Similar to B<-profile>, but merely initializes the installation
+configuration from I<profile> and then starts the interactive session.
=item B<-q>
More information about the tex-live-commits
mailing list