diff options
Diffstat (limited to 'Master/tlpkg/bin/tlpkg-ctan-check')
-rwxr-xr-x | Master/tlpkg/bin/tlpkg-ctan-check | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Master/tlpkg/bin/tlpkg-ctan-check b/Master/tlpkg/bin/tlpkg-ctan-check index 39bca88e036..03997643f44 100755 --- a/Master/tlpkg/bin/tlpkg-ctan-check +++ b/Master/tlpkg/bin/tlpkg-ctan-check @@ -259,7 +259,7 @@ sub do_tlp return 1; } - chomp (my $ctan_dir = `$mydir/tlpkginfo --ctan-dir-tds '$tlpn'`); + chomp (my $ctan_dir = `$mydir/tlpkginfo --prepare '$tlpn'`); if (! $ctan_dir) { warn "$0: oops, no CTAN directory for $tlpn, fix fix\n"; return (); @@ -309,7 +309,7 @@ sub do_tlp # regenerate them, so might as well check first. next if $tl_file =~ /\.pdf$/; - print "# $tpm\ndiff $ctan_file $tl_file\n"; + print "# $tlpn\ndiff $ctan_file $tl_file\n"; $needed = 1; last; } @@ -318,7 +318,7 @@ sub do_tlp # xx check ctan dir for new files if (@compared == 0) { - warn "\n$tpm: no files to compare in $ctan_dir, fixme!\n"; + warn "\n$tlpn: no files to compare in $ctan_dir, fixme!\n"; warn "(tpm_files = @tpm_files)\n"; } elsif ($needed == 0) { print "ok, " . (@compared + 0) . " compared (@compared)\n" |