branch: externals/ebdb
commit 50f39b6e27ed0d8766ad37ca4198bc310d89918e
Author: Eric Abrahamsen <[email protected]>
Commit: Eric Abrahamsen <[email protected]>
Forgot about rmail
* ebdb-rmail.el (ebdb-make-buffer-name): Add methods for rmail
major-modes.
---
ebdb-rmail.el | 10 ++++++++--
1 file changed, 8 insertions(+), 2 deletions(-)
diff --git a/ebdb-rmail.el b/ebdb-rmail.el
index 4f630cd..9b4b5e9 100644
--- a/ebdb-rmail.el
+++ b/ebdb-rmail.el
@@ -44,13 +44,19 @@
(mail-header-extract))))))
(cl-defmethod ebdb-message-header ((header string)
- &context (major-mode (eql rmail-mode)))
+ &context (major-mode rmail-mode))
(ebdb/rmail-header header))
(cl-defmethod ebdb-message-header ((header string)
- &context (major-mode (eql
rmail-summary-mode)))
+ &context (major-mode rmail-summary-mode))
(ebdb/rmail-header header))
+(cl-defmethod ebdb-make-buffer-name (&context (major-mode rmail-mode))
+ (format "*%s-Rmail*" ebdb-buffer-name))
+
+(cl-defmethod ebdb-make-buffer-name (&context (major-mode rmail-summary-mode))
+ (format "*%s-Rmail*" ebdb-buffer-name))
+
(defun ebdb-insinuate-rmail ()
"Hook EBDB into RMAIL.
Do not call this in your init file. Use `ebdb-initialize'."
