From: hmurata <hmurata>
Date: Mon, 8 Aug 2005 04:03:31 +0000 (+0000)
Subject: (wl-addrbook-setup): Set
X-Git-Tag: wl-2_15_3~60
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=127423276666295574649584d3858996084535ff;p=elisp%2Fwanderlust.git

(wl-addrbook-setup): Set
`wl-summary-get-petname-function' instead of
`wl-summary-from-function'.
---

diff --git a/utils/ChangeLog b/utils/ChangeLog
index f0462cd..001114d 100644
--- a/utils/ChangeLog
+++ b/utils/ChangeLog
@@ -1,3 +1,9 @@
+2005-08-08  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+	* wl-addrbook.el (wl-addrbook-setup): Set
+	`wl-summary-get-petname-function' instead of
+	`wl-summary-from-function'.
+
 2005-08-05  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
 	* wl-addrbook.el (wl-addrbook-get-names): Abolish.
diff --git a/utils/wl-addrbook.el b/utils/wl-addrbook.el
index 36f80fd..bbca3ae 100644
--- a/utils/wl-addrbook.el
+++ b/utils/wl-addrbook.el
@@ -137,7 +137,7 @@ If nil,  the old 'user' entry remains.")
   (setq wl-address-init-function 'wl-addrbook-init)
   ;;
   (when wl-summary-use-addrbook-from-func
-    (setq wl-summary-from-function 'wl-summary-addrbook-from))
+    (setq wl-summary-get-petname-function 'wl-addrbook-get-nickname))
   (define-key wl-summary-mode-map "\C-c\C-a" 'wl-summary-addrbook-add)
   (define-key wl-draft-mode-map "\C-i"     'wl-draft-addrbook-header-comp-or-tab)
   (define-key wl-draft-mode-map "\e\t"     'wl-draft-addrbook-expand)