activated new convergence test

diff --git a/lib/Perl/Tidy.pm b/lib/Perl/Tidy.pm
index dc82b600f2e6c0962f8978c939dc588a8213e5ec..aca0ba780dbdecb3c9bf169f6148a5e8ac4d4285 100644 (file)
--- a/lib/Perl/Tidy.pm
+++ b/lib/Perl/Tidy.pm
@@ -1454,8 +1454,8 @@ EOM
                 }
                 elsif ($do_convergence_test) {
 
-                    # FIXME: future convergence test
-                    ## $stop_now ||= defined($iteration_of_formatter_convergence); 
+                    # stop if the formatter has converged
+                    $stop_now ||= defined($iteration_of_formatter_convergence); 
 
                     my $digest = $md5_hex->($sink_buffer);
                     if ( !defined( $saw_md5{$digest} ) ) {