summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-05-06 06:42:55 +0000
committerNorbert Preining <preining@logic.at>2008-05-06 06:42:55 +0000
commit307dd09ad44284d3ccae4d47479f42adf6833c70 (patch)
tree9ec56ba9041ca5233302f5c625810ecbc00df14d /Master
parent64ab19535642886f2a545f6f124b91043e8f5860 (diff)
try to fix tlmgr gui on win32 with spaces in names
git-svn-id: svn://tug.org/texlive/trunk@7890 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-xMaster/texmf/scripts/texlive/tlmgr.pl6
1 files changed, 4 insertions, 2 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl
index c2e6f6153dd..79363c66f77 100755
--- a/Master/texmf/scripts/texlive/tlmgr.pl
+++ b/Master/texmf/scripts/texlive/tlmgr.pl
@@ -86,12 +86,14 @@ $DiskArchive = $opt_diskarchive if (defined($opt_diskarchive));
if (defined($action) && ($action =~ m/^gui/i)) {
my $perlbin = "perl";
+ my $perlscript = "$Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl";
if ($^O=~/^MSWin(32|64)$/i) {
$ENV{'PERL5LIB'} = "$Master/tlpkg/tlperl/lib";
- $perlbin = "$Master/tlpkg/tlperl/bin/perl.exe";
+ $perlbin = "\"$Master/tlpkg/tlperl/bin/perl.exe\"";
+ $perlscript = "\"$perlscript\"";
}
my @cmdline;
- push @cmdline, $perlbin, "$Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl";
+ push @cmdline, $perlbin, $perlscript;
push @cmdline, "--location", "$opt_location"
if (defined($opt_location));
push @cmdline, "--netarchive", "$opt_netarchive"