diff options
author | Norbert Preining <preining@logic.at> | 2008-07-31 14:25:26 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-07-31 14:25:26 +0000 |
commit | 057fa5720078a3d0c0ad1f67d7a8f7865aa9ab77 (patch) | |
tree | 182c428aa3736c56f7beb564e970050fce04fefe /Master | |
parent | 2fd61852ed1bac0d34d1121293339b56de2cd2d2 (diff) |
install-tl: continue if there is a package missing, don't know whether this
is a good idea, but better than dieing.
git-svn-id: svn://tug.org/texlive/trunk@9937 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-x | Master/install-tl | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/Master/install-tl b/Master/install-tl index ff89060380e..a02a65e5eaa 100755 --- a/Master/install-tl +++ b/Master/install-tl @@ -617,6 +617,12 @@ sub calc_depends { # loop over all the pre_selected and add them foreach $p (@pre_selected) { ddebug("pre_selected $p\n"); + my $pkg = $tlpdb->get_package($p); + if (!defined($pkg)) { + tlwarn("W: $p is mentioned somewhere but not available, disabling it!\n"); + $install{$p} = 0; + next; + } foreach my $p_dep ($tlpdb->get_package($p)->depends) { if ($p_dep =~ m/^(.*)\.ARCH$/) { my $foo = "$1"; @@ -650,7 +656,10 @@ sub calc_depends { foreach $p (keys %install) { my $tlpobj = $tlpdb->get_package($p); if (not(defined($tlpobj))) { - die "Cannot find $p in texlive.tlpdb, strange!\n"; + tlwarn("W: $p should be installed bug cannot be found in texlive.tlpdb!\n"); + tlwarn("W: disabling it (expect this messages a view times!)\n"); + $install{$p} = 0; + next; } $size+=$tlpobj->docsize if $vars{'option_doc'}; $size+=$tlpobj->srcsize if $vars{'option_src'}; |