[mew-dist 22909] mew-draft-header (was: Reply-To:, Followup-To:, ...)

[Tatsuya Kinoshita]

On January 16, 2003, [mew-dist 22870],
Kazu Yamamoto <kazu at example.com> wrote:

> mew-insert-address-list2() の代りに mew-insert-address-list() を使い、
> del の初期値を nil にしておくのでしょうか？
> 
> とりあえず、パッチを作ってもらえると嬉しいです。

個人的な希望としては、下記のようにfrommeのときの処理をなくしてほ
しいだけです。(元の動作の必要性は理解できていません。もし必要なの
であれば、変数で切り替えできるように)

---- 
--- mew-draft.el	2003/01/16 11:03:29	1.82
+++ mew-draft.el	2003/01/19 23:03:31
@@ -357,17 +357,13 @@
 	(mew-draft-header-insert mew-to: to))
        ;; To: collected by reply
        ((listp to)
-	(if fromme
-	    (mew-insert-address-list2 mew-to: to)
-	  (setq del (mew-insert-address-list mew-to: to del t)))))
+	(setq del (mew-insert-address-list mew-to: to del t))))
       (cond
        ((null cc) ()) ;; do nothing 
        ((stringp cc) ;; Cc: inputed from the mini-buffer.
 	(mew-draft-header-insert mew-cc: cc))
        ((listp cc) ;; Cc: collected by reply.
-	(if fromme
-	    (mew-insert-address-list2 mew-cc: cc)
-	  (mew-insert-address-list mew-cc: cc del nil)))))
+	(mew-insert-address-list mew-cc: cc del nil))))
     (if mew-case-guess-when-prepared
 	(mew-draft-set-case-by-guess))
     (setq case (mew-tinfo-get-case))
---- 

-- 
木下達也