branch: externals/ebdb
commit 5613bc2f9a9e8443dd9ed242630fd63e76db6fc0
Author: Eric Abrahamsen <[email protected]>
Commit: Eric Abrahamsen <[email protected]>
Fix bug in ebdb-record-field-slot-query
* ebdb.el (ebdb-record-field-slot-query): Checking the wrong variable.
---
ebdb.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/ebdb.el b/ebdb.el
index edbe275..62a53b1 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -1919,7 +1919,7 @@ either case is a cons with both slot and fieldclass
filled in.")
(pcase query
(`(nil . ,cls)
(or (rassq cls alist)
- (rassq (ebdb-class-in-list-p class (mapcar #'cdr alist))
+ (rassq (ebdb-class-in-list-p cls (mapcar #'cdr alist))
alist)
(signal 'ebdb-unacceptable-field (list cls))))
(`(,slot . nil)
