Changeset 5613

Timestamp:

06/26/09 13:48:46 (3 years ago)

Author:

claudio

Message:

Print failure to restore cursor to STDERR instead of STDOUT

File:

• trunk/Padre-Plugin-PerlTidy/lib/Padre/Plugin/PerlTidy.pm (modified) (1 diff)

trunk/Padre-Plugin-PerlTidy/lib/Padre/Plugin/PerlTidy.pm

@@ -279 +279 @@
     if ($@) {
         $regex = qw{^.};
-        print @_;
+        print STDERR @_;
     }
     return ( $regex, $start );