texlive[48057] Master/tlpkg/installer/tracked-install.pl: update also

[commits+preining at tug.org]

Revision: 48057
          http://tug.org/svn/texlive?view=revision&revision=48057
Author:   preining
Date:     2018-06-20 04:14:01 +0200 (Wed, 20 Jun 2018)
Log Message:
-----------
update also tracked install for perltk to update log

Modified Paths:
--------------
    trunk/Master/tlpkg/installer/tracked-install.pl

Modified: trunk/Master/tlpkg/installer/tracked-install.pl
===================================================================
--- trunk/Master/tlpkg/installer/tracked-install.pl	2018-06-20 01:47:45 UTC (rev 48056)
+++ trunk/Master/tlpkg/installer/tracked-install.pl	2018-06-20 02:14:01 UTC (rev 48057)
@@ -52,19 +52,21 @@
 
   if (@::WARNLINES) {
     foreach my $t (@::WARNLINES) {
-      update_status ($t);
+      tlwarn ("$t\n");
     }
   }
   if ($::env_warns) {
-    update_status($::env_warns);
+    tlwarn($::env_warns);
   }
   $::progressw->tagConfigure('centered', -justify => 'center');
   # basic welcome message
   foreach my $t (@::welcome_arr) {
-    #my $s = shift @$t;
-    $::progressw->insert("end", "$t\n", 'centered');
+    info("$t\n");
   }
   $::progressw->insert("end", "\n");
+
+  do_cleanup();
+
   # additional info
   if ($::LOGFILENAME) {
     $::progressw->insert ("end", "Logfile: $::LOGFILENAME");