diff options
-rwxr-xr-x | Master/tlpkg/bin/tlpkginfo | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Master/tlpkg/bin/tlpkginfo b/Master/tlpkg/bin/tlpkginfo index 6167e5ed568..1d5435cf2ba 100755 --- a/Master/tlpkg/bin/tlpkginfo +++ b/Master/tlpkg/bin/tlpkginfo @@ -38,6 +38,9 @@ sub find_ctan_dir my ($me) = @_; return 1 unless $me; + # use explicit catalogue name if given in tlpsrc. + $me = &tlpsrc_find_catalogue ($me) || $me; + # regrettably, this list of amslatex packages is duplicated in ctan2tl. # unavoidable since ctan throws them all together, but we don't want # to, to preserve the package-per-directory name. @@ -45,9 +48,6 @@ sub find_ctan_dir $me = "amslatex"; } - # use explicit catalogue name if given in tlpsrc. - $me = &tlpsrc_find_catalogue ($me) || $me; - # The CTAN path to a package is sometimes stored in the TeX Catalogue, # but old entries don't have it, etc. Still, we want to use it if present. my $ctan_dir = &catalogue_find_ctan_path ($me); @@ -211,7 +211,7 @@ sub copy_to_tmpdir system ("rm -rf $pkgdir"); mkdir ($pkgdir, 0777); - warn "$0: copying single file $src\n"; + # warn "$0: copying single file $src\n"; unless (system ("cp -p '$src' '$pkgdir/'") == 0) { warn "$0: copy of $src to $pkgdir failed?!\n"; return undef; |