branch: externals/ebdb
commit a096b721f23d013d39c51e79bb181838fe64f5f3
Author: Eric Abrahamsen <e...@ericabrahamsen.net>
Commit: Eric Abrahamsen <e...@ericabrahamsen.net>
Move this definition after its dependent definitions
* ebdb.el (ebdb-init-field): This is tedious.
---
ebdb.el | 16 ++++++++--------
1 file changed, 8 insertions(+), 8 deletions(-)
diff --git a/ebdb.el b/ebdb.el
index e303b67..8a36d39 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -1416,14 +1416,6 @@ simple or complex name class."
(ebdb-puthash (ebdb-string name) record)
(cl-call-next-method))
-(cl-defmethod ebdb-init-field ((name ebdb-field-name-simple)
- (record ebdb-record-person))
- "Add a \"nickname-plus-lastname\" to the hash table."
- (when-let ((last-name (ebdb-record-lastname record)))
- (ebdb-puthash (concat (ebdb-string name) " " last-name)
- record))
- (cl-call-next-method))
-
(cl-defmethod ebdb-delete-field ((name ebdb-field-name-simple) record
&optional _unload)
(ebdb-remhash (ebdb-string name) record)
@@ -3506,6 +3498,14 @@ FIELD."
;; FIXME: Also add nickname-plus-surname to the hashtable.
(cl-call-next-method))
+(cl-defmethod ebdb-init-field ((name ebdb-field-name-simple)
+ (record ebdb-record-person))
+ "Add a \"nickname-plus-lastname\" to the hash table."
+ (when-let ((last-name (ebdb-record-lastname record)))
+ (ebdb-puthash (concat (ebdb-string name) " " last-name)
+ record))
+ (cl-call-next-method))
+
(cl-defmethod ebdb-delete-field ((name ebdb-field-name-simple)
(record ebdb-record-person)
&optional _unload)
