[elpa] externals/ebdb 50f39b6 031/350: Forgot about rmail

[Eric Abrahamsen]

branch: externals/ebdb
commit 50f39b6e27ed0d8766ad37ca4198bc310d89918e
Author: Eric Abrahamsen <address@hidden>
Commit: Eric Abrahamsen <address@hidden>

    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'."