This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
mktables: Remove extraneous debug statement
authorKarl Williamson <public@khwilliamson.com>
Sat, 9 Oct 2010 23:40:45 +0000 (17:40 -0600)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 12 Oct 2010 20:45:31 +0000 (13:45 -0700)
lib/unicore/mktables

index cfedcf3..e58b996 100644 (file)
@@ -9604,7 +9604,6 @@ END
             # essentially be this code.)  This uses the algorithm published by
             # Unicode.
             if (property_ref('Decomposition_Mapping')->to_output_map) {
-        local $to_trace = 1 if main::DEBUG;
                 for (my $S = $SBase; $S < $SBase + $SCount; $S++) {
                     use integer;
                     my $SIndex = $S - $SBase;