texlive[51520] Master/install-tl: Eliminated superfluous 'endload'

[commits+siepo at tug.org]

Revision: 51520
          http://tug.org/svn/texlive?view=revision&revision=51520
Author:   siepo
Date:     2019-07-01 21:07:17 +0200 (Mon, 01 Jul 2019)
Log Message:
-----------
Eliminated superfluous 'endload' output

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

Modified: trunk/Master/install-tl
===================================================================
--- trunk/Master/install-tl	2019-07-01 18:48:20 UTC (rev 51519)
+++ trunk/Master/install-tl	2019-07-01 19:07:17 UTC (rev 51520)
@@ -31,6 +31,21 @@
   unshift (@INC, "$::installerdir/tlpkg");
 }
 
+# debugging communication with external gui: use shared logfile
+
+our $dblfile = "/tmp/dblog";
+$dblfile = $ENV{'TEMP'} . "\\dblog.txt" if ($^O =~ /^MSWin/i);
+$dblfile = $ENV{'TMPDIR'} . "/dblog" if ($^O eq 'darwin'
+                                         && exists $ENV{'TMPDIR'});
+sub dblog {
+  my $s = shift;
+  open(my $dbf, ">>", $dblfile);
+  print $dbf "PERL: $s\n";
+  close $dbf;
+}
+
+dblog(join("\n", @ARGV));
+
 # On unix, this run of install-tl may do duty as a wrapper for
 # install-tl-gui.tcl, which in its turn will start an actual run of install-tl.
 # Skip this wrapper block if we can easily rule out a tcl gui:
@@ -170,19 +185,6 @@
 # global list of warnings
 @::WARNLINES = ();
 
-# debugging communication with external gui: use shared logfile
-
-our $dblfile = "/tmp/dblog";
-$dblfile = $ENV{'TEMP'} . "\\dblog.txt" if ($^O =~ /^MSWin/i);
-$dblfile = $ENV{'TMPDIR'} . "/dblog" if ($^O eq 'darwin'
-                                         && exists $ENV{'TMPDIR'});
-sub dblog {
-  my $s = shift;
-  open(my $dbf, ">>", $dblfile);
-  print $dbf "PERL: $s\n";
-  close $dbf;
-}
-
 # we play around with the environment, place to keep original
 my %origenv = ();
 
@@ -703,7 +705,7 @@
   }
   read_profile($opt_profile);
   if ($from_ext_gui) {
-    print STDOUT "endload\n\n";
+    #print STDOUT "endload\n\n";
     print STDOUT "startinst\n";
   }
 }