Changeset 1681

Show
Ignore:
Timestamp:
10/25/05 15:50:59
Author:
miyagawa
Message:

drop UTF-8 flag for summary

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • sbm-xpost/trunk/sbm-xpost.cgi

    r1670 r1681  
    33use CGI; 
    44use DateTime; 
     5use Encode; 
    56use HTTP::Request::Common; 
    67use LWP::UserAgent; 
     
    7677    my $summary = join '', map "[$_]", split /\s+/, $q->param('tags'); 
    7778    $summary .= " " . $q->param('comment') if $q->param('comment'); 
     79    Encode::_utf8_off($summary); 
    7880 
    7981    my $entry = XML::Atom::Entry->new;