diff options
Diffstat (limited to 'Master/tlpkg/bin/tlpkginfo')
-rwxr-xr-x | Master/tlpkg/bin/tlpkginfo | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/Master/tlpkg/bin/tlpkginfo b/Master/tlpkg/bin/tlpkginfo index b89e8f8eef6..45df00708ab 100755 --- a/Master/tlpkg/bin/tlpkginfo +++ b/Master/tlpkg/bin/tlpkginfo @@ -67,10 +67,11 @@ sub tlpkgrevision { sub ctaninfo { $CTAN = $ENV{"CTAN"} || "/home/ftp/tex-archive"; $TMPDIR = $ENV{"TMPDIR"} || "/tmp"; - $CATALOGUE = $ENV{"TEX_CATALOGUE"} || "/home/httpd/html/catalogue/entries"; + my $top_cat = $ENV{"TEX_CATALOGUE"} || "/home/texlive/catalogue"; + $CATALOGUE = "$top_cat/entries"; -d "$CATALOGUE/k" - || die "$0: TEX_CATALOGUE ($CATALOGUE) must point to entries/ subdir" - . " of a TeX Catalogue checkout.\n"; + || die "$0: TEX_CATALOGUE ($CATALOGUE) must point to the top level" + . " of a TeX Catalogue checkout (with entries/ subdir).\n"; # erroneous or problematic tds files (when new, tell CTAN and author). # ieeeconf: capitals in directory names. @@ -474,7 +475,7 @@ sub prepare { sub copy_to_tmpdir { my ($pkgname,$src) = @_; - my $pkgdir = "$TMPDIR/tl.$pkgname"; + my $pkgdir = "$TMPDIR/$<.tl.$pkgname"; system ("rm -rf $pkgdir"); mkdir ($pkgdir, 0777) || die "mkdir($pkgdir) failed: $!"; |