[mew-dist 28251] Re: reedit での xface 挿入

[Takashi Masuda ( 増田貴士 )]

増田です。

From: Kazu Yamamoto (山本和彦) <kazu at example.com>
Date: Mon, 31 Mar 2008 10:52:23 +0900 (JST)
Subject: [mew-dist 28243] Re: reedit での xface 挿入

> > `E' で reedit した時に、~/.xface が挿入されなかったので、ちょっと修正し
> > てみました。取り込んで頂けますでしょうか？
> 
> ありがとうございます。マージしました。

ごめんなさい。修正したことによって、case を切り替えるたびに X-Face: が
追加されるようになってしまいました。添付のパッチも当てていただけますで
しょうか。

よろしくお願いします。

--
Takashi Masuda <masutaka at example.com>
-------------- next part --------------
Index: mew-config.el
===================================================================
RCS file: /cvsmew/mew/mew-config.el,v
retrieving revision 1.107
diff -u -r1.107 mew-config.el
--- mew-config.el	31 Mar 2008 01:50:26 -0000	1.107
+++ mew-config.el	31 Mar 2008 13:15:54 -0000
@@ -550,7 +550,7 @@
       (mew-header-replace-value mew-organization: (mew-organization new-case))
       (mew-header-delete-lines (mapcar 'car (mew-header-alist old-case)))
       (mew-header-delete-lines (mapcar 'car (mew-header-alist new-case)))
-      (mew-header-delete-lines (list mew-x-mailer:))
+      (mew-header-delete-lines (list mew-x-face: mew-x-mailer:))
       (mew-header-goto-end)
       (mew-draft-header-insert-xface)
       (mew-draft-header-insert-alist (mew-header-alist new-case))