projects / elisp / gnus.git- / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 08db1db)
Fix the last change.
authorueno <ueno>
Mon, 22 Apr 2002 06:05:44 +0000 (06:05 +0000)
committerueno <ueno>
Mon, 22 Apr 2002 06:05:44 +0000 (06:05 +0000)
lisp/gnus-bbdb.el patch | blob | history

diff --git a/lisp/gnus-bbdb.el b/lisp/gnus-bbdb.el
index 7a18625..9999498 100644 (file)
--- a/lisp/gnus-bbdb.el
+++ b/lisp/gnus-bbdb.el
@@ -50,7 +50,7 @@
   'gnus-bbdb/extract-message-sender)
 
 (defun gnus-bbdb/extract-message-sender ()
-  (let ((from (mail-header-from gnus-current-headers))
+  (let ((from (mime-entity-fetch-field gnus-current-headers "from"))
        to)
     (when from
       (setq from (gnus-bbdb/extract-address-components