more consistent untar wording.

git-svn-id: svn://tug.org/texlive/trunk@15005 c570f23f-e606-0410-a88d-b1316a301751

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;