diff options
author | Norbert Preining <preining@logic.at> | 2008-05-06 06:42:55 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-05-06 06:42:55 +0000 |
commit | 307dd09ad44284d3ccae4d47479f42adf6833c70 (patch) | |
tree | 9ec56ba9041ca5233302f5c625810ecbc00df14d /Master/texmf | |
parent | 64ab19535642886f2a545f6f124b91043e8f5860 (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/texmf')
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 6 |
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" |