summaryrefslogtreecommitdiff
path: root/Master/install-tl.pl
diff options
context:
space:
mode:
authorReinhard Kotucha <reinhard.kotucha@web.de>2007-10-12 20:55:55 +0000
committerReinhard Kotucha <reinhard.kotucha@web.de>2007-10-12 20:55:55 +0000
commitdd221d72c5189b8451fde5d974c69937fdbb15ae (patch)
treeafdcd71b36e2fb008471faae0caba4aaf9f696a8 /Master/install-tl.pl
parent6a0e2ad7fbd5390f452276199fb1be9567494426 (diff)
install-tl.pl: schemes menu now provides output.
git-svn-id: svn://tug.org/texlive/trunk@5171 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl.pl')
-rwxr-xr-xMaster/install-tl.pl13
1 files changed, 13 insertions, 0 deletions
diff --git a/Master/install-tl.pl b/Master/install-tl.pl
index 8ad5909c9ef..42de4acb40c 100755
--- a/Master/install-tl.pl
+++ b/Master/install-tl.pl
@@ -355,6 +355,19 @@ sub scheme_menu {
++$index;
}
+ foreach $entry (keys %vars) {
+ if ($entry=~/^inst-(Documentation|Package|TLCore)/) {
+ $vars{"$entry"}=0;
+ }
+ }
+
+ my $scheme_tlpobj = $tlpdb->get_package($vars{'selected_scheme'});
+ if (defined ($scheme_tlpobj)) {
+ foreach my $dependent ($scheme_tlpobj->depends) {
+ $vars{"inst-$dependent"}=1;
+ }
+ }
+
other_options;
print 'Press key to select a scheme: ';