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