FOX通信

3.17にアップグレードしたら、またもやこのエントリと同じくコメント通知メールに不具合発生。
今度は前回と違って差出人も空白、メールタイトルも空白なメールがやってくるようになってました。
（前回は差出人が空白、メールタイトルが正しいメールだった）
で、他力本願なオイラはまたまたReiaさんのところにヘルプコールを(^^;)
そしたら、見事に解決してくださいました。

針中野ミュージック – The Sky -: メールヘッダ問題、解決したぜェェ for MT 3.17

Movable Typeを3.17にアップグレードしてから、コメント通知メールがまたおかしなことになっていた。
以前のバージョンにパッチを当てる前のように「差出人が空白で、本文の出だしにメールヘッダが迷い込んだようなメール」がまたまた来るようになってしまった。
そのうえ、自力で編み出した 3.151以前用のパッチを当ててもダメときたもんだ。困った。
しかし、以前のパッチの作者としては、なんとしても新しいパッチも、という意地が……（めらめらめら）　笑

要は、

ふと「3.151まではうまくいってたんだから、3.151にどこか真似できる箇所はないだろうか」と両者のファイルを比較したところ、
改行コードとして3.151までは「\n」のみを付け加えていたのに対し、
3.17では「\r\n」を付加していたことが判明した。

という事らしいんですが、cgi（Perl？）のパラメータが良くわからないオイラは、
実の所中身（というかパラメータの意味）をあんまり理解してません(^^;)
　＃今度こそPerl本買ってこなくては…
ということで、修正内容は以下の通り。

まず、今までどおりのおまじない（笑）をlib/MT/Mail.pmに挟み込み。
3.17だと40〜41行あたり。
<br /> $hdrs->{Subject} =~ s/\r?\n/\r\n/g;<br /> # appended by Reia<br /> $hdrs->{Subject} =~ s/\r\n[^\Z]//g; # 追加行。「行末にないCR・LFコードは削除せよ」の意<br /> # end of addition<br /> $hdrs->{‘Content-Type’} = qq(text/plain; charset=”iso-2022-jp”);<br />
んで、ここからが3.17用のおまじない。
Mail.pmの121〜128行あたり。
<br /> for my $key (keys %$hdrs) {<br /> my @arr = ref($hdrs->{$key}) eq ‘ARRAY’ ?<br /> @{ $hdrs->{$key} } : ($hdrs->{$key});<br /> print MAIL map “$key: $_\n”, @arr; #ここの行の”\n”は元々 “\r\n”だった。<br /> }<br /> print MAIL “\n”; #ここの行の”\n”も元々 “\r\n”だった。<br /> print MAIL $body;<br />
これでメールの差出人もタイトルもちゃんと記載されたメールが届くそうです。
後でやってみよっと。
最後に…
Reiaさん、毎度毎度他力本願で申し訳ありません。
いつも助かってます。
ありがとうございました。