From: Thomas Fitzsimmons <fitzsim@fitzsim.org>
Date: Fri, 21 Jan 2022 22:40:57 +0000 (-0500)
Subject: EUDC: Fix a quoting bug in the BBDB backend
X-Git-Tag: emacs-28.0.92~88
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e58ecd01d51471e7e63d20ee059a5c26251220b7;p=emacs.git

EUDC: Fix a quoting bug in the BBDB backend

* lisp/net/eudcb-bbdb.el (eudc-bbdb-query-internal): Fix a quoting
bug introduced during lexical-binding conversion.
---

diff --git a/lisp/net/eudcb-bbdb.el b/lisp/net/eudcb-bbdb.el
index 60a3adbc34f..e71dc238d08 100644
--- a/lisp/net/eudcb-bbdb.el
+++ b/lisp/net/eudcb-bbdb.el
@@ -233,7 +233,7 @@ RETURN-ATTRS is a list of attributes to return, defaulting to
       (setq bbdb-attrs (append bbdb-attrs (list (car query-attrs))))
       (if (car query-attrs)
 	  ;; BEWARE: `bbdb-search' is a macro!
-	  (setq records (eval `(bbdb-search records ,@bbdb-attrs) t)))
+	  (setq records (eval `(bbdb-search (quote ,records) ,@bbdb-attrs) t)))
       (setq query-attrs (cdr query-attrs)))
     (mapc (lambda (record)
             (setq filtered (eudc-filter-duplicate-attributes record))