branch: externals/ebdb
commit 761dc2362db6277984c03fb131ef3006b8f57061
Author: Eric Abrahamsen <[email protected]>
Commit: Eric Abrahamsen <[email protected]>
Fix bug in searching by database
* ebdb.el (ebdb-record-search): That's not how you use `member'.
---
ebdb.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/ebdb.el b/ebdb.el
index 6b52893..1217591 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -5109,8 +5109,7 @@ values, by default the search is not handed to the name
field itself."
(cl-defmethod ebdb-record-search ((record ebdb-record)
(_type (eql database))
(db ebdb-db))
- (member (slot-value (ebdb-record-cache record) 'database)
- db))
+ (member db (slot-value (ebdb-record-cache record) 'database)))
(cl-defmethod ebdb-record-search ((record ebdb-record)
(_type (eql record-class))
