diff options
| author | Karl Berry <karl@freefriends.org> | 2020-04-20 22:45:46 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2020-04-20 22:45:46 +0000 |
| commit | 67635f11d8ff1b4f0417ad651f2bc10d1d2e09c5 (patch) | |
| tree | 5cd9980fef3220a60fe92e8c6556435a0051b7b9 /Master/tlpkg/bin/tlpkginfo | |
| parent | 9ac5474a83d80efa2129337a2acf8ed461717ecc (diff) | |
tlpkg-ctan-check: avoid catalogue update for every package; other doc and syntax tweaks, etc.
git-svn-id: svn://tug.org/texlive/trunk@54820 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/bin/tlpkginfo')
| -rwxr-xr-x | Master/tlpkg/bin/tlpkginfo | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/Master/tlpkg/bin/tlpkginfo b/Master/tlpkg/bin/tlpkginfo index e79c22e669f..479ca9090c7 100755 --- a/Master/tlpkg/bin/tlpkginfo +++ b/Master/tlpkg/bin/tlpkginfo @@ -71,6 +71,7 @@ sub ctaninfo { -d "$CATALOGUE/k" || die "$0: TEX_CATALOGUE ($CATALOGUE) must point to entries/ subdir" . " of a TeX Catalogue checkout.\n"; + $catalogue_update = 1; # do svn update of catalogue file? # erroneous or problematic tds files (when new, tell CTAN and author) $erroneous_tds = join ("|", @@ -92,6 +93,9 @@ sub ctaninfo { print "$output\n" if $output; return $output ? 0 : 1; + } elsif ($ARGV[0] eq "--no-catalogue") { + $catalogue_update = 0; + } elsif ($ARGV[0] eq "--prepare") { my $output = &prepare ($ARGV[1]); print "$output\n" if $output; # if no $output, errors elsewhere @@ -390,7 +394,7 @@ sub prepare { if ($catfile) { # redirect to stderr because we want the only stdout to be the # directory name for ctan2tl to use. - system ("svn update $catfile >&2"); + system ("timeout 8s svn update $catfile >&2") if $catalogue_update; open (CATFILE, "<$catfile") || die "open($catfile) failed, fixme: $!"; # looking for a line like <install path='...'/> |