summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin/tlpkg-ctan-check
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/bin/tlpkg-ctan-check')
-rwxr-xr-xMaster/tlpkg/bin/tlpkg-ctan-check11
1 files changed, 6 insertions, 5 deletions
diff --git a/Master/tlpkg/bin/tlpkg-ctan-check b/Master/tlpkg/bin/tlpkg-ctan-check
index 267eba9d1f6..2b63d2ea95f 100755
--- a/Master/tlpkg/bin/tlpkg-ctan-check
+++ b/Master/tlpkg/bin/tlpkg-ctan-check
@@ -1147,6 +1147,7 @@ sub do_tlp {
# look in the new dir we just created.
$ctan_dir = $pkgdir;
}
+ warn "ctan_dir: $ctan_dir\n";
my @tl_files = ();
push @tl_files, $tlp->runfiles;
@@ -1165,13 +1166,13 @@ sub do_tlp {
# the first one we come across, since we'll only find the first one
# on CTAN and we don't want to try to match subdir suffixes.
next if grep { $_ eq $basefile } @tl_basefiles;
-#warn "checking tl file $file -> $basefile\n";
+#warn "\nchecking tl file $file -> $basefile\n";
push (@tl_basefiles, $basefile);
# No point in comparing our pdfs now, too many are different.
# However, for lshort translations and mathdesign, pdf can be
# all we have to compare.
- next if $file =~ /\.pdf$/ && $file !~ /short|mathdesign/;
+ next if $file =~ /\.pdf$/ && $file !~ /short|match_parens|mathdesign/;
# seems mathpazo files were updated in TL and not CTAN.
# Too old to worry about.
@@ -1199,13 +1200,13 @@ sub do_tlp {
next;
}
- chomp (@ctan_files = `find $ctan_dir/ -name $basefile`);
-#warn "ctan find $basefile: @ctan_files\n";
+ chomp (@ctan_files = `find $ctan_dir/ -name $basefile -type f`);
+#warn " ctan find $basefile: @ctan_files\n";
# the trailing / is so we dereference a symlink on CTAN.
next if @ctan_files > 1; # if more than one file by same name, skip
my $ctan_file = $ctan_files[0];
-#warn "ctan file is $ctan_file\n";
+#warn " ctan file is $ctan_file\n";
if (! -e $ctan_file) {
# maybe it'll be there with a case change in the name
chomp (@ctan_files = `find $ctan_dir/ -iname $basefile`);