summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/bin')
-rwxr-xr-xMaster/tlpkg/bin/tlpkginfo6
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";