branch: elpa/emacsql
commit 1f6c06bda92f9e646af162eb997d1d9df5436ef0
Author: Christopher Wellons <well...@nullprogram.com>
Commit: Christopher Wellons <well...@nullprogram.com>

    Use expr expansion in :where expander.
---
 emacsql.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/emacsql.el b/emacsql.el
index 9a0d7521f6..1c22769a2b 100644
--- a/emacsql.el
+++ b/emacsql.el
@@ -432,8 +432,7 @@ definitions for return from a `emacsql-defexpander'."
 
 (emacsql-defexpander :where (expr)
   (emacsql-with-vars "WHERE "
-    (cl-destructuring-bind (op a b) expr
-      (format "%s %s %s" (var a :auto) op (var b :auto)))))
+    (combine (emacsql--expr expr))))
 
 (emacsql-defexpander :create-table (table schema)
   (emacsql-with-vars "CREATE TABLE "

Reply via email to