Changeset 2175

Timestamp:

12/23/08 09:21:40 (3 years ago)

Author:

hashbangperl

Message:

binmode fix for File::Temp

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;
-        use Encode;
-        $file->print( encode("utf8", $self->{text}) );
+        binmode( $file, ":utf8" );
+        $file->print( $self->{text} );
         $file->close;
         my @cmd = (