summaryrefslogtreecommitdiff
path: root/Master/tlpkg
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2009-09-02 23:14:12 +0000
committerKarl Berry <karl@freefriends.org>2009-09-02 23:14:12 +0000
commit1b364781cd8c3703601a0903f8b4d7eb19d36995 (patch)
tree0a31ae6711123bc83e928dc0ba6d3bc723f35939 /Master/tlpkg
parent66a9807e0ebc22e61952dd4dd0dd140283d2379a (diff)
more consistent untar wording.
git-svn-id: svn://tug.org/texlive/trunk@15005 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 1af542ef783..f26976e244a 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -1384,7 +1384,7 @@ sub install_package {
return 0;
}
if (!TeXLive::TLUtils::untar($tarfile, $target, 1)) {
- tlwarn("Un-tarring $tarfile did not succeed.\n");
+ tlwarn("untarring $tarfile failed, stopping install.\n");
return 0;
}
# we remove the created .tlpobj it is recreated anyway in
@@ -1900,9 +1900,9 @@ sub w32_remove_from_path {
=pod
-=item C<untar($tarfile,$targetdir, $remove_tarfile)>
+=item C<untar($tarfile, $targetdir, $remove_tarfile)>
-Unpacked C<$tarfile> in C<$targetdir> (changing directories to
+Unpacke C<$tarfile> in C<$targetdir> (changing directories to
C<$targetdir> and then back to the original directory). If
C<$remove_tarfile> is true, unlink C<$tarfile> after unpacking.
@@ -1927,7 +1927,7 @@ sub untar {
chdir($targetdir) || die "chdir($targetdir) failed: $!";
if (system($tar, "xf", $tarfile) != 0) {
- tlwarn("untarring $tarfile failed, please retry\n");
+ tlwarn("untar: untarring $tarfile failed (in $targetdir)\n");
$ret = 0;
} else {
$ret = 1;