[elpa] externals/ebdb e50a437 043/350: When unloading, don't remove records from the db's record slot

[Eric Abrahamsen]

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

    When unloading, don't remove records from the db's record slot
    
    This probably will help with #11
    
    * ebdb.el (ebdb-db-unload): Records should not be removed from the
      db's 'record slot, that will result in them getting deleted
      altogether!  Just use `ebdb-delete-record' to get them out of the
      secondary data structures, then remove the db from `ebdb-db-list'.
---
 ebdb.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ebdb.el b/ebdb.el
index 89e29d5..a2122fb 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -2877,8 +2877,8 @@ that doesn't belong to a different database."
     ;; databases.
     (if (= 1 (length (slot-value (ebdb-record-cache r) 'database)))
        (ebdb-delete-record r db t)
-      (object-remove-from-list (ebdb-record-cache r) 'database db))
-    (object-remove-from-list db 'records r)))
+      (object-remove-from-list (ebdb-record-cache r) 'database db)))
+  (setq ebdb-db-list (cl-remove db ebdb-db-list)))
 
 (defun ebdb-db-reload (db)
   (ebdb-db-unload db)