diff options
author | Norbert Preining <preining@logic.at> | 2009-05-16 22:23:55 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2009-05-16 22:23:55 +0000 |
commit | add62efa97755286e456d0b80fcde84b6b59e788 (patch) | |
tree | 02fbe197f475ca9d01cb94c967f6b1a9bc8ed427 /Master/tlpkg/installer/install-menu-text.pl | |
parent | 304dc81c731e7e61f01dc85d4d2b427861113903 (diff) |
allow installation of TeX Works in text/gui/wizard installer
git-svn-id: svn://tug.org/texlive/trunk@13139 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 | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/Master/tlpkg/installer/install-menu-text.pl b/Master/tlpkg/installer/install-menu-text.pl index f87a0924fb1..bec29497c9d 100755 --- a/Master/tlpkg/installer/install-menu-text.pl +++ b/Master/tlpkg/installer/install-menu-text.pl @@ -696,6 +696,7 @@ sub options_menu { my $b_deskint=button($vars{'option_desktop_integration'}); my $b_fileassocs=button($vars{'option_file_assocs'}); my $b_admin=button($vars{'option_w32_multi_user'}); + my $b_addoneditor=button($vars{'addon_editor'}); my $sys_bin=$vars{'sys_bin'}; my $sys_man=$vars{'sys_man'}; @@ -748,6 +749,7 @@ EOF print " <U> make installation available to all users: $b_admin\n"; } } + print " <E> install TeX Works editor: $b_addoneditor\n"; } other_options qw(R Q diskspace); my $answer = prompt 'Enter command'; @@ -822,6 +824,10 @@ EOF } elsif (defined $command{"\u$answer"}) { return $command{"\u$answer"}; + } elsif ("\u$answer" eq 'E') { + toggle 'addon_editor'; + return $command{'self'}; + } else { print "Unknown command: $answer\n\n"; return $command{'self'}; @@ -860,6 +866,7 @@ sub main_menu { my $b_deskint=button($vars{'option_desktop_integration'}); my $b_fileassocs=button($vars{'option_file_assocs'}); my $b_admin=button($vars{'option_w32_multi_user'}); + my $b_addoneditor=button($vars{'addon_editor'}); my $warn_nobin; @@ -976,6 +983,7 @@ EOF } else { print " $b_path create symlinks to standard directories\n"; } + print" $b_addoneditor install TeX Works Editor\n"; } if ($vars{'from_dvd'}) { |