branch: externals/ebdb
commit df9f68796b4be40b307298751add276247ee2cd1
Author: Eric Abrahamsen <>
Commit: Eric Abrahamsen <>

    Use ebdb-string on new mail addresses in ebdb-annotate-message
    * ebdb-mua.el (ebdb-annotate-message): Otherwise it dumps the actual
      mail object into the minibuffer and then disappears it, which is
      awfully distracting.
 ebdb-mua.el | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/ebdb-mua.el b/ebdb-mua.el
index b3e9ff3..515907b 100644
--- a/ebdb-mua.el
+++ b/ebdb-mua.el
@@ -998,8 +998,10 @@ Return the records matching ADDRESS or nil."
                (unless ebdb-silent
                  (if (ebdb-record-name record)
                      (message "created %s's record with address \"%s\""
-                              (ebdb-string record) mail)
-                   (message "created record with naked address \"%s\"" mail)))
+                              (ebdb-string record)
+                             (ebdb-string mail))
+                   (message "created record with naked address \"%s\""
+                           (ebdb-string mail))))
                (ebdb-init-record record))
@@ -1008,9 +1010,11 @@ Return the records matching ADDRESS or nil."
                         (message "noticed \"%s\"" (ebdb-string record)))
                        ((ebdb-record-name record)
                         (message "noticed %s's address \"%s\""
-                                 (ebdb-string record) mail))
+                                 (ebdb-string record)
+                                (ebdb-string mail)))
-                        (message "noticed naked address \"%s\"" mail))))))
+                        (message "noticed naked address \"%s\""
+                                (ebdb-string mail)))))))
         (run-hook-with-args 'ebdb-notice-mail-hook record)

Reply via email to