[Libreoffice-commits] .: Branch 'tinderbox' - bin/decode_tin_attach_filter.pl

[Christian Lohmaier]

 bin/decode_tin_attach_filter.pl |    3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

New commits:
commit e8de960ab1bf35be7f87be001143fe92f51fb274
Author: Christian Lohmaier <lohmaier+LibreOffice at googlemail.com>
Date:   Mon May 9 14:22:09 2011 +0200

    use open pragma instead of binmode to set i/o to utf8

diff --git a/bin/decode_tin_attach_filter.pl b/bin/decode_tin_attach_filter.pl
index c67986b..ce09f99 100755
--- a/bin/decode_tin_attach_filter.pl
+++ b/bin/decode_tin_attach_filter.pl
@@ -5,8 +5,7 @@ use utf8;
 use MIME::Parser;
 use MIME::Entity;
 use Compress::Zlib; 
-binmode STDIN, ":encoding(utf8)";
-binmode STDOUT, ":encoding(utf8)";
+use open ':encoding(utf8)', ':std';
 
 my $parser = new MIME::Parser;
 $parser->output_under("/tmp/mimemail");