Changeset 2174

Timestamp:

12/23/08 08:32:13 (3 years ago)

Author:

szabgab

Message:

try to fix some encoding issue while running the syntax checker of Perl

File:

• trunk/Padre/lib/Padre/Task/SyntaxChecker/Perl.pm (modified) (1 diff)

trunk/Padre/lib/Padre/Task/SyntaxChecker/Perl.pm

@@ -58 +58 @@
         require File::Temp;
         my $file = File::Temp->new;
-        $file->print( $self->{text} );
+        use Encode;
+        $file->print( encode("utf8", $self->{text}) );
         $file->close;
         my @cmd = (