Fix: (org-ql--def-query-string-to-sexp-fn) lexical-binding assertion error

Recent change to peg.el in Emacs master broke this function because the
eval form was not evaluated in lexical scoping.
This commit is contained in:
Stefan Monnier 2024-12-14 09:21:31 +05:30 committed by Visuwesh
parent 98c62ab0a6
commit 0c7005ff20

View file

@ -1003,7 +1003,8 @@ value of `org-ql-predicates')."
(peg-run (peg ,(caar pexs))
(lambda (failures)
(when org-ql-signal-peg-failure
(peg-signal-failure failures)))))))))
(peg-signal-failure failures)))))
t))))
(pcase parsed-sexp
(`(,one-predicate) one-predicate)
(`(,_ . ,_) (cons boolean (reverse parsed-sexp)))