summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLPDB.pm
diff options
context:
space:
mode:
authorPiotr Strzelczyk <piotr@eps.gda.pl>2011-07-02 06:31:51 +0000
committerPiotr Strzelczyk <piotr@eps.gda.pl>2011-07-02 06:31:51 +0000
commitb568316c57a65ca9faa1252a4adba29011822b94 (patch)
tree6697cec819207e0816d4901919b167ac8a13ecf9 /Master/tlpkg/TeXLive/TLPDB.pm
parentb6580f32abeaa98b671fe4136c6739991458a171 (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.pm4
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);