summaryrefslogtreecommitdiff
path: root/Master/tlpkg/installer/install-menu-text.pl
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-05-16 22:23:55 +0000
committerNorbert Preining <preining@logic.at>2009-05-16 22:23:55 +0000
commitadd62efa97755286e456d0b80fcde84b6b59e788 (patch)
tree02fbe197f475ca9d01cb94c967f6b1a9bc8ed427 /Master/tlpkg/installer/install-menu-text.pl
parent304dc81c731e7e61f01dc85d4d2b427861113903 (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-xMaster/tlpkg/installer/install-menu-text.pl8
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'}) {