This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
mktables: Suppress certain expected debug msgs
authorKarl Williamson <public@khwilliamson.com>
Sun, 10 Jul 2011 20:59:32 +0000 (14:59 -0600)
committerKarl Williamson <public@khwilliamson.com>
Sun, 10 Jul 2011 21:35:01 +0000 (15:35 -0600)
mktables has a mode for quicker debugging to skip processing some
input files.  When this is done, it is to be expected that the output
will be incomplete, so don't bother warning in this case.

lib/unicore/mktables

index f013142..3257a47 100644 (file)
@@ -14866,7 +14866,7 @@ END
 }
 
 # Output these warnings unless -q explicitly specified.
-if ($verbosity >= $NORMAL_VERBOSITY) {
+if ($verbosity >= $NORMAL_VERBOSITY && ! $debug_skip) {
     if (@unhandled_properties) {
         print "\nProperties and tables that unexpectedly have no code points\n";
         foreach my $property (sort @unhandled_properties) {