summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
Diffstat (limited to 'Master')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm5
1 files changed, 2 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 58a324a2591..0707f3661e2 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -675,8 +675,7 @@ sub install_package {
tllog($::LOG_DEBUG, `type \"$target\\temp\\$fn\" | $lzmadec > \"$target\\temp\\$tarfile\" 2>&1`);
tllog($::LOG_DEBUG, "Unpacking temp\\$tarfile\n");
tllog($::LOG_DEBUG, `pushd \"$target\" & $tar -xf \"temp\\$tarfile\" 2>&1`);
- unlink("$target\\temp\\$tarfile");
- unlink("$target\\temp\\$fn");
+ unlink("$target/temp/$tarfile", "$target/temp/$fn");
} else {
tllog($::LOG_DEBUG, "downloading/unlzma-ing/unpacking $what\n");
tllog($::LOG_NORMAL, `$wget -q -O- \"$what\"|\"$lzmadec\"|$tar -xf - -C \"$target\"`);
@@ -691,7 +690,7 @@ sub install_package {
tllog($::LOG_DEBUG, `$lzmadec < \"$what\" > \"$target\\temp\\$tarfile\" 2>&1`);
tllog($::LOG_DEBUG, "Unpacking temp\\$tarfile\n");
tllog($::LOG_DEBUG, `pushd \"$target\" & $tar -xf \"temp\\$tarfile\" 2>&1`);
- unlink("$target\\temp\\$tarfile");
+ unlink("$target/temp/$tarfile");
} else {
tllog($::LOG_DEBUG, "downloading/unlzma-ing/unpacking $what\n");
tllog($::LOG_DEBUG, `cat \"$what\"|\"$lzmadec\"|$tar -xf - -C \"$target\" 2>&1`);