[Mew-dist 10943] Re: I'd like to change headers

[Shun-ichi GOTO]

後藤＠太陽計測です

## どうもカゼらしい...

>>>>> at Sat, 16 Oct 1999 00:47:15 +0900, (か) <taka at example.com> said,

(か)> mew-from-listに複数のメールアドレスを設定しておくと，C-c TAB
(か)> でfromを切りかえることができますよね？

(か)> さらにこのfromに合わせてヘッダを変えられたらいいなぁ，と(個
(か)> 人的には)思うのですが，何かいい方法はありますでしょうか？

私は mew-config-guess の機能と mew-guess.el を併用して自動化してます。
Mew にconfig をguess させて、mew-guess.el でconfig 値を見てヘッダをいじ
るという段取りです。

設定はこんな風にして、

(setq mew-config-insert-when-prepared t
      mew-config-insert-when-composed t
      mew-config-guess-alist '(.......
      ))
(setq mew-guess-header-alist '( ..... ))
(load "mew-guess.el")
(defadvice mew-draft-insert-config (after replace-field activate)
  (if (not (mew-header-get-value "Resent-To"))
      (mew-guess-header)))
(defadvice mew-draft-make-message (before replace-field activate)
  (if (not (mew-header-get-value "Resent-To"))
      (mew-guess-header)))

# (mew-guess-header) をキーに割り当てるなどして、手動で置き換えする方が
# 良ければ、上記の2つのdefadvice は不要です。

このやりかたはからならず config を介してヘッダ修正が行なわれるため、
~/.im/config の方にもconfig を設定しておかなければならないですが、
mew-guess-header-alist の設定でconfig を消すようにするのもアリでしょう。
(多分)

--- Regards,
 Shun-ichi Goto  <gotoh at example.com>
   R&D Group, TAIYO Corp., Tokyo, JAPAN