This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fold_grind.t: Slightly change debug stmt
authorKarl Williamson <public@khwilliamson.com>
Mon, 9 May 2011 15:01:20 +0000 (09:01 -0600)
committerKarl Williamson <public@khwilliamson.com>
Thu, 19 May 2011 16:31:19 +0000 (10:31 -0600)
t/re/fold_grind.t

index 8a982f3..516e322 100644 (file)
@@ -285,8 +285,7 @@ foreach my $test (sort { numerically } keys %tests) {
                             $test,
                             join("", @x_target),
                             join("", @x_pattern);
-    #print $progress, "\n";
-    #diag $progress;
+    #note $progress;
 
     # Now grind out tests, using various combinations.
     foreach my $charset (@charsets) {