summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorSiep Kroonenberg <siepo@cybercomm.nl>2017-04-19 11:21:46 +0000
committerSiep Kroonenberg <siepo@cybercomm.nl>2017-04-19 11:21:46 +0000
commit437f8b2c32de74f9a26cf61059b8f9dee8d04a6f (patch)
tree2505b90ddf08657770d9d0bcac636df5532b8546 /Master
parent0a16d4bc75471c76f681617a75f49b8afda37a50 (diff)
Welcome to stdout; PERL5LIB exempted from environment check
git-svn-id: svn://tug.org/texlive/trunk@43920 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-xMaster/install-tl7
1 files changed, 4 insertions, 3 deletions
diff --git a/Master/install-tl b/Master/install-tl
index 4f99d347e6b..34d4e083214 100755
--- a/Master/install-tl
+++ b/Master/install-tl
@@ -595,13 +595,13 @@ if ($opt_gui eq 'text' or
if ($::env_warns) { print STDERR $::env_warns; }
unless ($ENV{"TEXLIVE_INSTALL_NO_WELCOME"}) {
foreach my $t (@::welcome_arr) {
- printf STDERR sprintf (shift @$t, @$t);
- print STDERR "\n";
+ printf STDOUT sprintf (shift @$t, @$t);
+ print STDOUT "\n";
}
}
do_cleanup(); # sets $::LOGFILENAME if not already defined
if ($LOGFILENAME) {
- print STDERR "Logfile: $::LOGFILENAME\n";
+ print STDOUT "Logfile: $::LOGFILENAME\n";
} else {
# do_cleanup sets $::LOGFILENAME to ""
#if no logfile could be written
@@ -2317,6 +2317,7 @@ sub check_env {
next if $evar =~ /^(_
|.*PWD
|GENDOCS_TEMPLATE_DIR|PATH|SHELLOPTS
+ |PERL5LIB
)$/x; # don't worry about these
if ("$evar $origenv{$evar}" =~ /tex/i) { # check both key and value
$::env_warns .= " $evar=$origenv{$evar}\n";