MTã?®Trackbackæ??å??å??ã??å¯?ç??

HPã??ã??ã??ã?¨ã??Jcode.pmã??ä?¿ç?¨ã??ã?¦ã??ã??è??ã?¯ã??./lib/MT/App/TrackBack.pmã??è¦?ã??ã?¦ã??
sub no_utf8ã?®æ¬?ã??ã??次ã?®ã??ã??ã??æ?¸ã??è¶?ã??ã?¨ã?®ã??ã?¨ã??

sub no_utf8 {
require Jcode;
for (@_) {
next if !defined $_;
$_ = pack 'C0A*', $_;
$_ = Jcode->new($_)->euc;
}
}

ã??ã??ã?§ã??次ã??ã?©ã?ªã??ã??utf8ã??ä?¿ç?¨ã??ã?¦ã??ã??æ??ã??TrackBackã??ã?¦ã??ã??ã??ã?¨ã??ã??ã??ã??ã??ã??ã??ã??ã??euc-jpã??å¤?æ??ã??ã??ã?¦ã??ã??ã?¯ã??ã?§ã??ã??ï??ã??ã??ã??ï??ã??

ã?¡ã?ªã?¿ã??ã??Commentã??å±?ã??ã??ã?¨ã??ã?ªã?©ã??å±?ã??ã?¡ã??ã??ã??æ??å??å??ã??ã??ã?¦ã??ã??ã?®ã??ã??ã??å??ã??ã??Milanoã??ã??ã?®HPã??å??è??ã??ã??ã??ã?¦ã??ã??ã??ã??ã??ã??

ã??ã??ã??ã??ã??ã?¨ã??./lib/MT/Mail.pmã??è¦?ã??ã?¦ã??22è¡?ç?®ã??ã??ã??ã?®

@{[ MT->version_slug ]}
SIG

ã?®æ¬¡ã??

require Jcode;
$body = Jcode->new($body)->jis;
$hdrs->{Subject} = Jcode->new($hdrs->{Subject})->mime_encode;
$hdrs->{'Content-Type'} = "text/plain; charset=\"ISO-2022-JP\"";

ã?¨æ?¸ã??å??ã??ã??ã??ã??ã??ã??ã??ã??å??ã??ã??ã??ã??ã??ã??ã??ã?§ã??ã??ã??ã??ã??ã?°é??常ã??å?©ã??ã??ã??ã??ã??