[mew-dist 29515] Re: mew-case-guess-addition and mode-line

[Eisaku YAMAGUCHI]

有賀さん;
                    山口と申します。

From: Seiji Ariga <ariga at example.com>
Date: Tue, 29 May 2012 14:37:54 -0400 (EDT)
> 
> 有賀です。

> というわけで、以下のような場合、case-b を適用させない書き方(設定)はござ
> いますでしょうか？

>> ("aaa at example.com" "case-a")
>> ("@example.com" "case-b")

もうちょっとエレガントに書けるのかもしれませんが、、、

(setq mew-case-guess-when-replied-alist
      '(("\\(To:\\|Cc:\\)"
	 ("@example.com"
	  (("\\(To:\\|Cc:\\)"
	    ("aaa" "case-a")
	    ("bbb" "case-b"))
	    :
	   (nil "case-z"))))))

5.2 指定した規則から推測
http://www.mew.org/ja/info/release/mew_5.html#by_002dalist
の、末尾の複雑な規則の設定例を参考にしてみました。

小生は mew-case-guess-alist を使っているので、簡単に試してみましたが、
有賀さんの希望通りの振る舞いをしてくれているように思います。:)

-- 
山口 栄作 <eisaku at example.com>