[elpa] externals/ebdb c9acc38 04/11: Add ebdb-org-field-tags to ebdb-hash-extra-predicates

[Eric Abrahamsen]

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

    Add ebdb-org-field-tags to ebdb-hash-extra-predicates
    
    * ebdb-org.el: Use the fast lookups for this field, too.
---
 ebdb-org.el | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/ebdb-org.el b/ebdb-org.el
index 4cbfeae..6a76b8b 100644
--- a/ebdb-org.el
+++ b/ebdb-org.el
@@ -122,6 +122,12 @@ italicized, in all other cases it is left unchanged."
   nil
   :human-readable "org tags")
 
+;; Use fast lookups on org-tags, too.
+(cl-pushnew (cons 'ebdb-org-field-tags
+                 (lambda (str rec)
+                   (ebdb-record-search rec 'ebdb-org-field-tags str)))
+           ebdb-hash-extra-predicates)
+
 (cl-defmethod ebdb-read ((field (subclass ebdb-org-field-tags)) &optional 
slots obj)
   (let* ((crm-separator (cadr (assq 'ebdb-field-tags ebdb-separator-alist)))
         (val (completing-read-multiple