diff options
Diffstat (limited to 'Master/tlpkg')
| -rwxr-xr-x | Master/tlpkg/bin/check-files-by-format | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Master/tlpkg/bin/check-files-by-format b/Master/tlpkg/bin/check-files-by-format index c93f3def849..c6df343c573 100755 --- a/Master/tlpkg/bin/check-files-by-format +++ b/Master/tlpkg/bin/check-files-by-format @@ -290,7 +290,7 @@ sub check_pdf { my $bad_exit = system("pdfinfo $tlroot/$file >/dev/null 2>$errfile"); my $badness = $bad_exit ? 2 : -s $errfile ? 1 : 0; return if $badness <= $excl_val; - print "Broken PDF: $file\n" if $badness == 2; + print "Bad PDF: $file\n" if $badness == 2; print "Damaged PDF: $file\n" if $badness == 1; } @@ -310,7 +310,7 @@ sub check_tfm { my $errfile = "$tmpdir/tfmerr"; unlink($errfile); system("tftopl $tlroot/$file $outfile 2>$errfile"); - print "Broken tfm: $file\n" if -s $errfile; + print "Bad tfm: $file\n" if -s $errfile; } sub check_vf { @@ -323,14 +323,14 @@ sub check_vf { my $errfile = "$tmpdir/vferr"; unlink($errfile); system("vftovp $tlroot/$file $tlroot/$tfmfile $outfile 2>$errfile"); - print "Broken vf: $file\n" if -s $errfile; + print "Bad vf: $file\n" if -s $errfile; } sub check_otf { my ($file) = @_; return if defined exclude_value($exclude_otf, $file); my $bad = system("otfinfo --info $tlroot/$file >/dev/null 2>&1"); - print "Broken otf: $file\n" if $bad; + print "Bad otf: $file\n" if $bad; } # vim: sw=2 expandtab |