[Mew-dist 05064] Re: citation

[Hideyuki SHIRAI]

From: Kazu Yamamoto (山本和彦) <kazu at example.com> さん曰く
Subject: [Mew-dist 05063] citation
Message-ID: <19980615172812U.kazu at example.com>
Date: Mon, 15 Jun 1998 17:12:29 +0900

kazu> そこで、すごくいい加減ですが、frame local variable を
kazu> 模倣して解決しました。

mew-cite-prefix-username() も有効にする一行パッチです。

--- mew-draft.el.orig	Mon Jun 15 17:35:25 1998
+++ mew-draft.el	Mon Jun 15 18:49:15 1998
@@ -1054,7 +1054,7 @@
   "A good candidate for mew-cite-prefix-function.
 The citation style is \"from_address> \", e.g. \"kazu> \""
   (let ((addr (mew-header-extract-addr
-	       (mew-header-get-value "From:")))
+	       (mew-header-get-value2 "From:")))
 	petname prefix)
     (if (and mew-use-petname mew-petname-alist
 	     (setq petname 


しかし、X-Faceを From:行に表示していると、

 mew-cite-strings() の
  (let ((fields (mapcar (function mew-header-get-value2) mew-cite-fields)))
の部分がX-Face付きで持って来てしまうので、ちょっと悲しいです。

# そうなりますよね? (自分の環境にちょっと自信が無い)

-- 
白井秀行 (Hideyuki SHIRAI)