* wl-addrbook.el (wl-summary-addrbook-from): Use

elmo-message-entity-field.

diff --git a/utils/ChangeLog b/utils/ChangeLog
index 24a5e8e..dda4a93 100644 (file)
--- a/utils/ChangeLog
+++ b/utils/ChangeLog
@@ -1,3 +1,8 @@
+2003-09-23  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * wl-addrbook.el (wl-summary-addrbook-from): Use
+       elmo-message-entity-field.
+
 2003-07-01  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
        * ptexinfmt.el: @verb, @tie, @/ support.

diff --git a/utils/wl-addrbook.el b/utils/wl-addrbook.el
index d9fd2dd..9a1c302 100644 (file)
--- a/utils/wl-addrbook.el
+++ b/utils/wl-addrbook.el
@@ -577,10 +577,9 @@ And use Addrbook for get user name."
          (string-match wl-summary-showto-folder-regexp
                        wl-summary-buffer-folder-name)
          (wl-address-user-mail-address-p fromaddr)
-         (cond ((setq dest (elmo-msgdb-overview-entity-get-to entity))
+         (cond ((setq dest (elmo-message-entity-field entity 'to))
                 (concat "To:" (eword-decode-string (wl-addrbook-get-names dest))))
-               ((setq dest (elmo-msgdb-overview-entity-get-extra-field
-                            entity "newsgroups"))
+               ((setq dest (elmo-message-entity-field entity 'newsgroups))
                 (concat "Ng:" dest))))
      (wl-addrbook-nickname-get fromaddr)
      from)))