diff options
| author | Siep Kroonenberg <siepo@cybercomm.nl> | 2019-07-01 18:48:20 +0000 |
|---|---|---|
| committer | Siep Kroonenberg <siepo@cybercomm.nl> | 2019-07-01 18:48:20 +0000 |
| commit | 9c1bf6c24c49916e2fc5fbbe15f0edcc8f5921e7 (patch) | |
| tree | c6611d1e3adaf9412c6a07391321373c033d07e3 | |
| parent | 092165e2875b9816169ed03d644a334cc70f40f9 (diff) | |
Fix for installer directory with spaces
git-svn-id: svn://tug.org/texlive/trunk@51519 c570f23f-e606-0410-a88d-b1316a301751
| -rwxr-xr-x | Master/tlpkg/installer/install-tl-gui.tcl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/Master/tlpkg/installer/install-tl-gui.tcl b/Master/tlpkg/installer/install-tl-gui.tcl index 17d46eefa60..5545d31437a 100755 --- a/Master/tlpkg/installer/install-tl-gui.tcl +++ b/Master/tlpkg/installer/install-tl-gui.tcl @@ -56,7 +56,8 @@ set ::out_log {}; # list of strings 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 @@ proc make_splash {} { -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 |