From: morioka <morioka>
Date: Wed, 28 Jul 1999 14:54:43 +0000 (+0000)
Subject: (mime-bbdb/update-record): Use `mime-entity-fetch-field' instead of
X-Git-Tag: remi-1_13_2~17
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=e788d4e18b64e62ce17f4edb32990b08092f6380;p=elisp%2Fsemi.git

(mime-bbdb/update-record): Use `mime-entity-fetch-field' instead of
`mime-fetch-field'.
---

diff --git a/mime-bbdb.el b/mime-bbdb.el
index 39913df..1b61d64 100644
--- a/mime-bbdb.el
+++ b/mime-bbdb.el
@@ -167,7 +167,7 @@ the user confirms the creation."
                 (null (setq addr (car (mime-entity-read-field message 'From))))
                 (string-match (bbdb-user-mail-names)
 			      (std11-address-string addr)))
-            (setq from (or (mime-fetch-field 'To message)
+            (setq from (or (mime-entity-fetch-field message 'To)
 			   from))
 	  )
         (if from