diff options
author | Norbert Preining <preining@logic.at> | 2017-04-16 02:14:32 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2017-04-16 02:14:32 +0000 |
commit | 1c648a68ca221309d5f1ba01e27245c996bc5e5f (patch) | |
tree | 72940cf21d6747862de32561714408524e4511bf /Master/install-tl | |
parent | 3515a7a2754bd5ce7a996720ccda5a0f92ade23a (diff) |
simplify code, drop last appearance of menu_integration
git-svn-id: svn://tug.org/texlive/trunk@43834 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl')
-rwxr-xr-x | Master/install-tl | 14 |
1 files changed, 4 insertions, 10 deletions
diff --git a/Master/install-tl b/Master/install-tl index d7c96322204..665811c63b6 100755 --- a/Master/install-tl +++ b/Master/install-tl @@ -575,7 +575,10 @@ foreach my $key (sort keys %vars) { } log("Settings:\n" . $varsdump); -sanitise_options(); +# portable option overrides any system integration options +$vars{'instopt_adjustpath'} = 0 if $vars{'instopt_portable'}; +$vars{'tlpdbopt_file_assocs'} = 0 if $vars{'instopt_portable'}; +$vars{'tlpdbopt_desktop_integration'} = 0 if $vars{'instopt_portable'}; install_warnlines_hook(); # collect warnings in @::WARNLINES info("Installing to: $vars{TEXDIR}\n"); @@ -780,7 +783,6 @@ sub do_installation { } if ($vars{'instopt_portable'}) { $vars{'tlpdbopt_desktop_integration'} = 0; - $vars{'tlpdbopt_menu_integration'} = 0; $vars{'tlpdbopt_file_assocs'} = 0; $vars{'instopt_adjustpath'} = 0; $vars{'tlpdbopt_w32_multi_user'} = 0; @@ -1904,14 +1906,6 @@ sub read_profile { } } # read_profile -# helper subroutine to do sanity check of options before installation -sub sanitise_options { - # portable option overrides any system integration options - $vars{'instopt_adjustpath'} = 0 if $vars{'instopt_portable'}; - $vars{'tlpdbopt_file_assocs'} = 0 if $vars{'instopt_portable'}; - $vars{'tlpdbopt_desktop_integration'} = 0 if $vars{'instopt_portable'}; -} # sanitise_options - sub do_install_packages { my @what; foreach my $package (sort keys %install) { |