summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xMaster/install-tl2
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm9
2 files changed, 6 insertions, 5 deletions
diff --git a/Master/install-tl b/Master/install-tl
index 319eb5a3d7c..ac34c122baf 100755
--- a/Master/install-tl
+++ b/Master/install-tl
@@ -1,7 +1,7 @@
#!/usr/bin/env perl
# $Id$
#
-# Copyright 2007, 2008 Reinhard Kotucha, Norbert Preining
+# Copyright 2007, 2008, 2009 Reinhard Kotucha, Norbert Preining
# This file is licensed under the GNU General Public License version 2
# or any later version.
#
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 1e1dec3525c..915888823b9 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -1308,7 +1308,7 @@ sub setup_programs {
return 1; # success
}
-#
+
# setup one prog on unix using the following logic:
# - if the shipped one is -x and can be executed, use it
# - if the shipped one is -x but cannot be executed, copy it. set -x
@@ -1320,7 +1320,8 @@ sub setup_programs {
# - if nothing shipped, GOTO fallback
#
# fallback:
-# if prog itself is found and can be executed, use it, otherwise return 0
+# if prog is found in PATH and can be executed, use it,
+# otherwise return 0.
#
sub setup_unix_one {
my ($p, $def, $arg) = @_;
@@ -1397,8 +1398,8 @@ sub setup_unix_one {
if ($ret == 0) {
debug("Using system $p (tested).\n");
} else {
- tlwarn("TeXLive::TLUtils::setup_programs failed.\n");
- tlwarn("Could not find a usable program for $p.\n");
+ tlwarn("Initialization failed (in setup_unix_one):\n");
+ tlwarn(" could not find a usable program for $p.\n");
return 0;
}
} else {