texlive[51519] Master/tlpkg/installer/install-tl-gui.tcl: Fix for

[commits+siepo at tug.org]

Revision: 51519
          http://tug.org/svn/texlive?view=revision&revision=51519
Author:   siepo
Date:     2019-07-01 20:48:20 +0200 (Mon, 01 Jul 2019)
Log Message:
-----------
Fix for installer directory with spaces

Modified Paths:
--------------
    trunk/Master/tlpkg/installer/install-tl-gui.tcl

Modified: trunk/Master/tlpkg/installer/install-tl-gui.tcl
===================================================================
--- trunk/Master/tlpkg/installer/install-tl-gui.tcl	2019-07-01 16:01:48 UTC (rev 51518)
+++ trunk/Master/tlpkg/installer/install-tl-gui.tcl	2019-07-01 18:48:20 UTC (rev 51519)
@@ -56,7 +56,8 @@
 
 set ::perlbin "perl"
 if {$::tcl_platform(platform) eq "windows"} {
-  set ::perlbin "${::instroot}/tlpkg/tlperl/bin/perl.exe"
+  # the batch wrapper should have put perl.exe on the searchpath
+  set ::perlbin "perl.exe"
 }
 
 # menu modes
@@ -331,7 +332,7 @@
              -font bigfont] -in .bg
   ppack [ttk::label .loading -text [__ "Trying to load %s.
 
-If this takes too long, press Abort and choose another repository." \
+If this takes too long, press Abort or choose another repository." \
                                         $::prelocation]] -in .bg
 
   wm attributes . -topmost