[Mew-dist 402] Re: メッセージが日本語か英語かで環境を分ける。

[Mikio Nakajima]

  こんばんは、中島です。

From: 桐山和彦 <kiri at example.com>
Subject: [Mew-dist 401] Re: メッセージが日本語か英語かで環境を分ける。
Date: Mon, 13 Jan 1997 19:58:27 +0900
Message-ID: <199701131058.TAA16386 at example.com>

kiri> 桐山 です。

  あれ、色んな所でお会いしますね (^_^)。


kiri> 今ちょうど欲しかったところです^_^。

  喜んでいただけて嬉しいです。とても吟味されていて美しいとは言えま
せんけど、とりあえず需要はありますよね。


kiri> From: も使い分けられたらいいんですが...。
kiri> 
kiri> ＃ これは mh なんでダメですか？
kiri> ＃ 注文ばかりでいつも申しわけありません。

  mew-from を使ってらっしゃらないんですか？  mew-from を使ってらっ
しゃるなら、次のような手もあるかと (私は PGP を使うので、From を使
い分けたいとは思いませんが)。

ただ、mew-from は本文を書く前に挿入されてしまうので、send する前に
フックで処理されます。ますますカッコ悪い。

中島幹夫 <gy2m-nkjm at example.com>


-------------- next part --------------
(setq mew-from "中島幹夫 <gy2m-nkjm at example.com>")

(add-hook 'mew-send-hook
          (function
           (lambda ()
             (if (string=
                  (mew-charset-guess-region mew-draft-buffer-header (point-max))
                  "us-ascii" )
                 (save-excursion
                   (goto-char (point-min))
                   (if (search-forward  (concat "\nFrom: " mew-from)
                                        mew-draft-buffer-header 'noerror )
                       (progn
                         (delete-region (+ (match-beginning 0) 7) (match-end 0))
                         (insert "Mikio Nakajima <gy2m-nkjm at example.com>") )))))))