diff options
author | Siep Kroonenberg <siepo@cybercomm.nl> | 2008-06-16 10:06:05 +0000 |
---|---|---|
committer | Siep Kroonenberg <siepo@cybercomm.nl> | 2008-06-16 10:06:05 +0000 |
commit | 3a5b2524e003dc7a4cd629e4ac5f174e240a9015 (patch) | |
tree | 341230315fa0f551495a94b444a11e7748e09577 /Master/tlpkg/installer/install-menu-text.pl | |
parent | 0fc07861068854d87880efb89df8c81b7c2e82fd (diff) |
Moved from dvd/to hd option in text menu to below the options
git-svn-id: svn://tug.org/texlive/trunk@8774 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/installer/install-menu-text.pl')
-rwxr-xr-x | Master/tlpkg/installer/install-menu-text.pl | 24 |
1 files changed, 10 insertions, 14 deletions
diff --git a/Master/tlpkg/installer/install-menu-text.pl b/Master/tlpkg/installer/install-menu-text.pl index 673440e5bb4..be7b33ee232 100755 --- a/Master/tlpkg/installer/install-menu-text.pl +++ b/Master/tlpkg/installer/install-menu-text.pl @@ -432,13 +432,11 @@ sub directories_menu { <1> TEXDIRW: $vars{'TEXDIRW'} (root for configuration- and generated data) EOF -; } else { print <<"EOF"; <1> TEXDIR: $vars{'TEXDIR'} support tree: $vars{'TEXDIR'}/texmf EOF -; } print <<"EOF"; @@ -449,7 +447,6 @@ EOF <5> TEXMFHOME: $vars{'TEXMFHOME'} EOF -; if (win32) { print " Note: ~ will expand to %USERPROFILE%\n"; @@ -816,13 +813,7 @@ sub main_menu { =======> for commands or configurable options <======= EOF -; - if ($vars{'from_dvd'}) { - print " <T> Install to HD (current setting: install for running from DVD)\n\n"; - } else { - print " <V> Install for running from DVD (current setting: install to HD)\n\n"; - } if (!$vars{'from_dvd'}) { print <<"EOF"; @@ -837,7 +828,7 @@ EOF <L> language collections $vars{'n_collections_selected'} collections out of $vars{'n_collections_available'}, disk space required: $vars{'total_size'} MB EOF -; + if (!check_on_lang_collection_installed()) { print " !! No language specific collection selected!\n"; print " !! If you only write English documentes that is fine!\n"; @@ -848,13 +839,11 @@ EOF <D> directories: TEXDIR (the main TeX directory): EOF -; } else { # $vars{'from_dvd'} print <<"EOF"; <D> directories: TEXDIRW (Writable root): EOF -; } if (TeXLive::TLUtils::texdir_check($vars{$maindir})) { @@ -871,13 +860,14 @@ EOF TEXMFSYSCONFIG (directory for local config): $vars{'TEXMFSYSCONFIG'} - <O> options: EOF -; print <<"EOF"; + + <O> options: $b_letter use letter size instead of A4 by default $b_fmt create all format files + EOF if (!$vars{'from_dvd'}) { @@ -892,6 +882,12 @@ EOF } } + if ($vars{'from_dvd'}) { + print "\n <T> Install to HD (current setting: install for running from DVD)\n\n"; + } else { + print "\n <V> Install for running from DVD (current setting: install to HD)\n\n"; + } + other_options qw (I H Q); my $answer=prompt 'Enter command'; |