[Mew-dist 06740] Re: pick & virtual-mode

[Kazumasa Utashiro]

From: Murata Takashi <Takashi.Murata at example.com>
Subject: [Mew-dist 06718] pick & virtual-mode
Date: Tue, 20 Oct 1998 12:14:53 +0900

>   以前から、?(pick) や V(virtual mode)で subject= に日本語が使えなくて
> 悲しかったのですが、"ABC漢字" のようにASCIIでも日本語とつながっていると、
> "ABC"も含めてMIME encodeされてしまい、subject=ABC でも掛からなくなって
> さらに悲しくなってしまいます。
> 
>   なんとかならないかな〜と、以下のような修正をしました(IM-102への修正)。
> ついでにsubjectなどヘッダへの日本語パターンも出来るようにしました。Perl
> 知らずで修正していますので適当なのですが、とりあえず動作しています。

前に Grep.pm に手を入れた時に、どうしようかなーと思って、とりあえず放
置した部分です。

> ***************
> *** 119,124 ****
> --- 120,126 ----
>   	close(MES);
>   
>   	$head =~ s/\n\s+/ /g; # fix continuation lines
> + 	$head = mime_decode_string($head);
>   	if (eval $eval_string) {
>   	    push(@messages, $m);
>   	}

これは $head を探す時しか必要ないので、$find{'head'} が真の時だけやる
ようにするといいですね。その上の行もそうですね。%find をブロックの外に
出しちゃえばいいかな。

修正はお任せします。コメントで残すなんて必要はないので、消しちゃってく
ださい。

--utashiro