[elpa] externals/ebdb e159e3a 070/350: Yet another method definition in the wrong place

[Eric Abrahamsen]

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

    Yet another method definition in the wrong place
    
    * ebdb.el (ebdb-field-mail-compose): Move below definition of
      `ebdb-record-entity'
---
 ebdb.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/ebdb.el b/ebdb.el
index 300e9a7..df6f967 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -1047,10 +1047,6 @@ values, by default the search is not handed to the name 
field itself."
   The optional \"object-name\" slot can serve as a mail aka."
   :human-readable "mail")
 
-(cl-defmethod ebdb-field-mail-compose ((record ebdb-record-entity)
-                                      (mail ebdb-field-mail))
-  (ebdb-compose-mail (ebdb-dwim-mail record mail)))
-
 (cl-defmethod ebdb-init-field ((mail ebdb-field-mail) &optional record)
   (with-slots (aka mail) mail
     (ebdb-puthash mail record)
@@ -2159,6 +2155,10 @@ priority."
   (let ((sorted (ebdb-sort-mails (slot-value record 'mail))))
     (setf (slot-value record 'mail) sorted)))
 
+(cl-defmethod ebdb-field-mail-compose ((record ebdb-record-entity)
+                                      (mail ebdb-field-mail))
+  (ebdb-compose-mail (ebdb-dwim-mail record mail)))
+
 (cl-defmethod ebdb-record-primary-mail ((record ebdb-record-entity))
   "Return the primary mail field of RECORD."
   (let ((mails (ebdb-record-mail record t)))