branch: externals/ebdb
commit b610b9646da938ca924770791d5515de5aaca079
Author: Eric Abrahamsen <[email protected]>
Commit: Eric Abrahamsen <[email protected]>

    ebdb-record-search can accept symbols for search type
    
    * ebdb.el (ebdb-search): Don't use pcase to filter based on type.
      Essentially we're using generic methods to filter on type.
---
 ebdb.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ebdb.el b/ebdb.el
index 62a53b1..b6b01f0 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -4572,7 +4572,7 @@ interpreted as t, ie the record passes."
              (condition-case nil
               (dolist (c clauses)
                 (pcase c
-                  (`(,(and type (pred class-p)) ,criteria)
+                  (`(,type ,criteria)
                    (and (ebdb-record-search r type criteria)
                         (throw 'found t)))
                   (`,(and func (pred functionp))

Reply via email to