From 057fa5720078a3d0c0ad1f67d7a8f7865aa9ab77 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Thu, 31 Jul 2008 14:25:26 +0000 Subject: 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 --- Master/install-tl | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) (limited to 'Master') 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'}; -- cgit v1.2.3