summaryrefslogtreecommitdiff
path: root/Master/tlpkg
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-05-28 15:32:16 +0000
committerNorbert Preining <preining@logic.at>2008-05-28 15:32:16 +0000
commitf463b283de1a85177ff46c78a14b415c4fc47c39 (patch)
treedbd280e143a04f422f73b25333dc029f084560b3 /Master/tlpkg
parent3830b77c9141c060fd7e79f64f00b7481ddb9548 (diff)
installer: do not install collection_wintools forcibly, but select it when
you select win32. But you can still deselect it afterwards git-svn-id: svn://tug.org/texlive/trunk@8387 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rw-r--r--Master/tlpkg/installer/install-menu-perltk.pl5
-rwxr-xr-xMaster/tlpkg/installer/install-menu-text.pl10
2 files changed, 15 insertions, 0 deletions
diff --git a/Master/tlpkg/installer/install-menu-perltk.pl b/Master/tlpkg/installer/install-menu-perltk.pl
index 452272c6667..2b72870873b 100644
--- a/Master/tlpkg/installer/install-menu-perltk.pl
+++ b/Master/tlpkg/installer/install-menu-perltk.pl
@@ -649,6 +649,11 @@ sub callback_select_collection {
}
sub callback_select_systems() {
+ if ($vars{"binary_win32"}) {
+ $vars{"collection-wintools"} = 1;
+ } else {
+ $vars{"collection-wintools"} = 0;
+ }
calc_depends();
update_numbers();
menu_update_texts();
diff --git a/Master/tlpkg/installer/install-menu-text.pl b/Master/tlpkg/installer/install-menu-text.pl
index c13490e91bf..b984b1a075a 100755
--- a/Master/tlpkg/installer/install-menu-text.pl
+++ b/Master/tlpkg/installer/install-menu-text.pl
@@ -147,6 +147,11 @@ sub binary_menu {
toggle "$keyval{$keystroke}";
}
}
+ if ($vars{"binary_win32"}) {
+ $vars{"collection-wintools"} = 1;
+ } else {
+ $vars{"collection-wintools"} = 0;
+ }
if (defined $command{"\u$answer"}) {
return $command{"\u$answer"}->();
} else {
@@ -200,6 +205,11 @@ sub scheme_menu {
}
}
}
+ if ($vars{"binary_win32"}) {
+ $vars{"collection-wintools"} = 1;
+ } else {
+ $vars{"collection-wintools"} = 0;
+ }
other_options qw(R Q);
my $answer=prompt 'Press key to select a scheme';