lettre (13apr20)

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

1 files changed, 5 insertions, 1 deletions

diff --git a/Master/tlpkg/bin/tlpkginfo b/Master/tlpkg/bin/tlpkginfo
index 7777fa19bca..f0c1d310344 100755
--- a/Master/tlpkg/bin/tlpkginfo
+++ b/Master/tlpkg/bin/tlpkginfo
@@ -388,6 +388,10 @@ sub prepare {
   my $catname = tlpsrc_find_catalogue ($pkg);
   my $catfile = &catalogue_find_file ($catname || $pkg);
   if ($catfile) {
+    # quiet update because we want the only stdout to be the
+    # directory name for ctan2tl to use.
+    system ("svn -q update $catfile >&2");
+    
     open (CATFILE, "<$catfile") || die "open($catfile) failed, fixme: $!";
     # looking for a line like <install path='...'/>
     # We don't really want to parse xml; turns out these are always on
@@ -407,7 +411,7 @@ sub prepare {
   }
   
 #warn "prepare: initial tds_path for $pkg = $tds_path\n";
-  # ...except for heiko, when running on tug.org...
+  # various exceptions to tds.zip location ...
   if ($pkg eq "context") {
     $tds_path = "/home/ftp/mirror/www.pragma-ade.nl/context/latest/cont-tmf.zip";