summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin/tlpkginfo
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/bin/tlpkginfo')
-rwxr-xr-xMaster/tlpkg/bin/tlpkginfo13
1 files changed, 10 insertions, 3 deletions
diff --git a/Master/tlpkg/bin/tlpkginfo b/Master/tlpkg/bin/tlpkginfo
index 67fc1e0f392..f7e67749c63 100755
--- a/Master/tlpkg/bin/tlpkginfo
+++ b/Master/tlpkg/bin/tlpkginfo
@@ -255,7 +255,7 @@ sub find_ctan_dir {
}
-# If the .tlpsrc file for ME has a catalogue entry, return it,
+# If the .tlpsrc file for ME specifies a catalogue entry, return it,
# else return empty string.
#
sub tlpsrc_find_catalogue {
@@ -340,8 +340,8 @@ sub catalogue_find_ctan_path {
}
#
-# Create a tmpdir with the tds-ready tree unpacked if any,
-# else return the normal ctan dir.
+# Create a tmpdir with the tds-ready tree for PKG unpacked, if it exists,
+# else return the normal ctan dir for PKG.
#
sub prepare {
my ($pkg) = @_;
@@ -349,6 +349,7 @@ sub prepare {
# find the real ctan dir and return it if our tds is erroneous
my $ctan_loc = &find_ctan_dir ($pkg, 1); # pass do_copy=1
+#warn "prepare: ctan_loc for $pkg = $ctan_loc\n";
return $ctan_loc if $pkg =~ /^($erroneous_tds)$/;
# tds path is usually in ctan/install...
@@ -369,6 +370,12 @@ sub prepare {
# and do the rest in ctan2tds as usual.
$tds_path = "$CTAN/systems/enctex/enctex.tar.gz";
+ } elsif ($pkg eq "fibeamer") {
+ # we need to parse the Catalogue .xml for the <install> path,
+ # but hack around it since this is the only (?) one
+ # that doesn't fit the pattern.
+ $tds_path = "$CTAN/install/macros/latex/contrib/$pkg.tds.zip";
+
} elsif ($pkg eq "hfoldsty") {
$tds_path = glob ("$CTAN/fonts/hfoldsty/hfoldsty-v*.zip");