diff options
author | Piotr Strzelczyk <piotr@eps.gda.pl> | 2011-07-02 06:31:51 +0000 |
---|---|---|
committer | Piotr Strzelczyk <piotr@eps.gda.pl> | 2011-07-02 06:31:51 +0000 |
commit | b568316c57a65ca9faa1252a4adba29011822b94 (patch) | |
tree | 6697cec819207e0816d4901919b167ac8a13ecf9 /Master/tlpkg/TeXLive/TLPDB.pm | |
parent | b6580f32abeaa98b671fe4136c6739991458a171 (diff) |
fix install from/to path with spaces
git-svn-id: svn://tug.org/texlive/trunk@23179 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPDB.pm')
-rw-r--r-- | Master/tlpkg/TeXLive/TLPDB.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm index 85e52cdc411..a644db08522 100644 --- a/Master/tlpkg/TeXLive/TLPDB.pm +++ b/Master/tlpkg/TeXLive/TLPDB.pm @@ -291,7 +291,7 @@ sub from_file { } $xzfile_quote = "\"$xzfile\""; $tlpdbfile_quote = "\"$tlpdbfile\""; - my $xzdec = "\"$::progs{'xzdec'}\""; + my $xzdec = TeXLive::TLUtils::quotify_path_with_spaces($::progs{'xzdec'}); debug("trying to download $path.xz to $xzfile\n"); my $ret = TeXLive::TLUtils::download_file("$path.xz", "$xzfile"); # better to check both, the return value AND the existence of the file @@ -1293,7 +1293,7 @@ sub _install_package { # we assume that $::progs has been set up! my $wget = $::progs{'wget'}; - my $xzdec = "\"$::progs{'xzdec'}\""; + my $xzdec = TeXLive::TLUtils::quotify_path_with_spaces($::progs{'xzdec'}); if (!defined($wget) || !defined($xzdec)) { tlwarn("_install_package: programs not set up properly, strange.\n"); return(0); |