fixed to stop after 1 iteration when using '-io -conv'

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index ee8c6cb1e651c1f8e40ec2a17b500aefa2262777..db551282128baf7335cc0fa87237b2ba811fca8c 100644 (file)
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -20303,7 +20303,8 @@ sub wrapup {
 
     $file_writer_object->report_line_length_errors();
 
-    $self->[_converged_] = $file_writer_object->get_convergence_check();
+    $self->[_converged_] = $file_writer_object->get_convergence_check()
+      || $rOpts->{'indent-only'};
 
     return;
 }