texlive[48056] Master/install-tl: installer cleanup: add warnings and

[commits+preining at tug.org]

Revision: 48056
          http://tug.org/svn/texlive?view=revision&revision=48056
Author:   preining
Date:     2018-06-20 03:47:45 +0200 (Wed, 20 Jun 2018)
Log Message:
-----------
installer cleanup: add warnings and welcome to log file in text mode

Modified Paths:
--------------
    trunk/Master/install-tl

Modified: trunk/Master/install-tl
===================================================================
--- trunk/Master/install-tl	2018-06-20 00:23:36 UTC (rev 48055)
+++ trunk/Master/install-tl	2018-06-20 01:47:45 UTC (rev 48056)
@@ -588,7 +588,6 @@
 info("Installing to: $vars{TEXDIR}\n");
 
 $::env_warns = "";
-check_env() unless $ENV{"TEXLIVE_INSTALL_ENV_NOCHECK"};
 create_welcome();
 my $status = 1;
 if ($opt_gui eq 'text' or $opt_profile ne "" or
@@ -597,11 +596,9 @@
   if (@::WARNLINES) {
     foreach my $t (@::WARNLINES) { print STDERR $t; }
   }
-  if ($::env_warns) { print STDERR $::env_warns; }
+  if ($::env_warns) { tlwarn($::env_warns); }
   unless ($ENV{"TEXLIVE_INSTALL_NO_WELCOME"}) {
-    foreach my $t (@::welcome_arr) {
-      print STDOUT "$t\n";
-    }
+    info(join("\n", @::welcome_arr));
   }
   do_cleanup(); # sets $::LOGFILENAME if not already defined
   if ($LOGFILENAME) {
@@ -888,8 +885,12 @@
 
   # check environment for possibly tex-related strings:
   check_env() unless $ENV{"TEXLIVE_INSTALL_ENV_NOCHECK"};
+
+  # We do clean up in the main installation part
+  # don't do this here because it closes the log file and
+  # further messages (warnings, welcome) are not logged.
   # log, profile, temp files:
-  do_cleanup();
+  # do_cleanup();
 
   create_welcome();
   if (@::WARNLINES) {