emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ebdb 3d819bc 17/33: Have ebdb-do-records filter out stu


From: Eric Abrahamsen
Subject: [elpa] externals/ebdb 3d819bc 17/33: Have ebdb-do-records filter out stub uuids
Date: Sun, 3 Sep 2017 17:02:22 -0400 (EDT)

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

    Have ebdb-do-records filter out stub uuids
    
    * ebdb-com.el (ebdb-do-records): Only operate on the record if it's a
      proper record.
    
    All this is sort of moving towards making the unloading of databases
    completely bulletproof.
---
 ebdb-com.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/ebdb-com.el b/ebdb-com.el
index 5d10dd3..b716af4 100644
--- a/ebdb-com.el
+++ b/ebdb-com.el
@@ -232,7 +232,8 @@ instead.  If FULL is non-nil, the list of records includes
 display information."
   (let* ((marked (seq-filter (lambda (r) (nth 3 r)) ebdb-records))
         (recs (or marked (list (ebdb-current-record t)))))
-   (if full recs (mapcar 'car recs))))
+    (setq recs (seq-filter (lambda (r) (eieio-object-p (car r))) recs))
+    (if full recs (mapcar 'car recs))))
 
 ;;; Keymap
 (defvar ebdb-mode-map



reply via email to

[Prev in Thread] Current Thread [Next in Thread]