From 7182acf11046ef9182624e4755a0fca9c3fb8bf0 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Fri, 1 Aug 2008 20:20:25 +0000 Subject: install-tl: check the return value of setup_programs git-svn-id: svn://tug.org/texlive/trunk@9993 c570f23f-e606-0410-a88d-b1316a301751 --- Master/install-tl | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/Master/install-tl b/Master/install-tl index 86e75560857..51ca522d756 100755 --- a/Master/install-tl +++ b/Master/install-tl @@ -304,7 +304,10 @@ if ($opt_arch) { # initialize the correct platform platform(); -setup_programs ("$::installerdir/tlpkg/installer", "$::_platform_"); +if (!setup_programs ("$::installerdir/tlpkg/installer", "$::_platform_")) { + tlwarn("Couldn't set up the necessary programs.\nCannot continue with installation.\nPlease report to texlive\@tug.org.\n"); + exit 1; +} $ENV{'WGETRC'}="$::installerdir/tlpkg/installer/wgetrc"; # -- cgit v1.2.3