branch: externals/ebdb
commit 70754b8acb9612cf8054de0b9c576cdf978e8b22
Author: Eric Abrahamsen <e...@ericabrahamsen.net>
Commit: Eric Abrahamsen <e...@ericabrahamsen.net>

    Fix unnecessary code in ebdb-follow-related
    
    * ebdb-com.el (ebdb-follow-related): No need to mapcar ebdb-records,
      that's what the APPEND argument does.
---
 ebdb-com.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/ebdb-com.el b/ebdb-com.el
index da14952..ff6d447 100644
--- a/ebdb-com.el
+++ b/ebdb-com.el
@@ -1293,8 +1293,7 @@ With prefix N move backwards N (sub)fields."
                     (ebdb-current-field)))
   (condition-case nil
       (ebdb-display-records
-       (cons (ebdb-record-related record field)
-            (mapcar #'car ebdb-records))
+       (list (ebdb-record-related record field))
        ebdb-default-multiline-formatter
        t)
     (ebdb-related-unfound

Reply via email to