branch: externals/ebdb commit df9f68796b4be40b307298751add276247ee2cd1 Author: Eric Abrahamsen <e...@ericabrahamsen.net> Commit: Eric Abrahamsen <e...@ericabrahamsen.net>
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)) (change-p @@ -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))) (t - (message "noticed naked address \"%s\"" mail)))))) + (message "noticed naked address \"%s\"" + (ebdb-string mail))))))) (run-hook-with-args 'ebdb-notice-mail-hook record)