[elpa] externals/ebdb b2b56f8 07/12: Fix to "add nicknames to person record cache"

[Eric Abrahamsen]

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

    Fix to "add nicknames to person record cache"
    
    * ebdb.el (ebdb-init-field, ebdb-delete-field): Was using the wrong 
specializer.
---
 ebdb.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/ebdb.el b/ebdb.el
index c480465..70e3d41 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -1178,20 +1178,20 @@ simple or complex name class."
   (cl-call-next-method))
 
 (cl-defmethod ebdb-init-field ((name ebdb-field-name-simple)
-                              (record (subclass ebdb-record-person)))
+                              (record ebdb-record-person))
   (object-add-to-list
    (ebdb-record-cache record) 'alt-names
    (concat (ebdb-string name) " "
-          (slot-value (slot-value record 'name) 'surname)))
+          (ebdb-name-last (slot-value record 'name))))
   (cl-call-next-method))
 
 (cl-defmethod ebdb-delete-field ((name ebdb-field-name-simple)
-                                (record (subclass ebdb-record-person))
+                                (record ebdb-record-person)
                                 &optional _unload)
   (object-remove-from-list
    (ebdb-record-cache record) 'alt-names
    (concat (ebdb-string name) " "
-          (slot-value (slot-value record 'name) 'surname)))
+          (ebdb-name-last (slot-value record 'name))))
   (cl-call-next-method))
 
 (cl-defmethod ebdb-parse ((class (subclass ebdb-field-name-simple)) str 
&optional slots)