diff options
-rwxr-xr-x | Build/tools/tlpkginfo | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/Build/tools/tlpkginfo b/Build/tools/tlpkginfo index c3a86de2033..535c205576c 100755 --- a/Build/tools/tlpkginfo +++ b/Build/tools/tlpkginfo @@ -10,11 +10,14 @@ sub main { $CTAN = $ENV{"CTAN"} || "/home/ftp/tex-archive"; $CATALOGUE = $ENV{"TEX_CATALOGUE"} || "/home/httpd/html/catalogue/entries"; + -d "$CATALOGUE/k" + || die "$0: TEX_CATALOGUE ($CATALOGUE) must point to entries/ subdir" + . " of a TeX Catalogue checkout.\n"; if ($ARGV[0] eq "--ctan-dir") { return &find_ctan_dir ($ARGV[1]); } else { - die "$0: only know about --ctan-dir PKGNAME.\n"; + die "Usage: $0 --ctan-dir PKGNAME (not @ARGV)\n"; } } |