Changeset 1079

Show
Ignore:
Timestamp:
07/13/06 16:09:30
Author:
miyagawa
Message:

better Unicode handling. Fixed compile error. Refs #329

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/plagger/lib/Plagger.pm

    r1078 r1079  
    66use Carp; 
    77use Data::Dumper; 
    8 use Encode; 
     8use Encode (); 
    99use File::Copy; 
    1010use File::Basename; 
    …… 
    5757 
    5858    if (eval { require Term::Encoding }) { 
    59         $self->{conf}->{log}->{encoding} ||= Term::Encoding::get_encoding; 
     59        $self->{conf}->{log}->{encoding} ||= Term::Encoding::get_encoding(); 
    6060    } 
    6161 
    …… 
    375375        chomp($msg); 
    376376        if ($self->{log}->{encoding}) { 
     377            $msg = Encode::decode_utf8($msg) unless utf8::is_utf8($msg); 
    377378            $msg = Encode::encode($self->{log}->{encoding}, $msg); 
    378379        }