summaryrefslogtreecommitdiff
path: root/Master/install-tl
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-08-07 22:44:18 +0000
committerNorbert Preining <preining@logic.at>2008-08-07 22:44:18 +0000
commitec02a0c77c5b010a6c963378e6420007b70b6faa (patch)
tree82bfc3ccdf1e0163552ec4fcc2a73c7f41a83b79 /Master/install-tl
parent4c3b6f8fda7016906b0a4b5a6c7225cb3d318a9b (diff)
install-tl: if the $default_scheme = "scheme-full" is not defined, switch
to scheme-minimal, and if that is also not defined, die. git-svn-id: svn://tug.org/texlive/trunk@10152 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl')
-rwxr-xr-xMaster/install-tl10
1 files changed, 10 insertions, 0 deletions
diff --git a/Master/install-tl b/Master/install-tl
index b1103da9830..adc4ef190b4 100755
--- a/Master/install-tl
+++ b/Master/install-tl
@@ -703,6 +703,16 @@ sub load_tlpdb {
$vars{'sys_bin'} = $tlpdb->option_sys_bin;
$vars{'sys_man'} = $tlpdb->option_sys_man;
$vars{'sys_info'} = $tlpdb->option_sys_info;
+
+ # check that the default scheme is actually present, otherwise switch to
+ # scheme-minimal
+ if (!defined($tlpdb->get_package($default_scheme))) {
+ if (!defined($tlpdb->get_package("scheme-minimal"))) {
+ die("Something is going seriously bad, cannot find nor $default_scheme nor scheme_minimal!");
+ }
+ $default_scheme = "scheme-minimal";
+ $vars{'selected_scheme'} = $default_scheme;
+ }
}
sub initialize_collections {