(smime-process-region): Use `binary-funcall' instead of

[elisp/semi.git] / mime-bbdb.el

diff --git a/mime-bbdb.el b/mime-bbdb.el
index 23d4fb3..1b61d64 100644 (file)
--- a/mime-bbdb.el
+++ b/mime-bbdb.el
@@ -164,8 +164,7 @@ the user confirms the creation."
             (from (mime-entity-fetch-field message 'From))
             addr)
        (if (or (null from)
-                (null
-                (setq addr (car (mime-entity-read-field message 'From))))
+                (null (setq addr (car (mime-entity-read-field message 'From))))
                 (string-match (bbdb-user-mail-names)
                              (std11-address-string addr)))
             (setq from (or (mime-entity-fetch-field message 'To)
@@ -173,7 +172,7 @@ the user confirms the creation."
          )
         (if from
             (bbdb-annotate-message-sender
-             (eword-decode-structured-field-body from) t
+             (mime-decode-field-body from 'From) t
              (or (bbdb-invoke-hook-for-value mime-bbdb/auto-create-p)
                  offer-to-create)
              offer-to-create))