From ce7f2b93bb4dc17ae083ca33327c618a2038f420 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Thu, 16 Oct 2025 12:37:14 -0400 Subject: [PATCH] lisp/emacs-lisp/rx.el ( rx): Workaround for bug#79634 --- lisp/emacs-lisp/rx.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lisp/emacs-lisp/rx.el b/lisp/emacs-lisp/rx.el index 229f1dbb57b..617a0fb1d40 100644 --- a/lisp/emacs-lisp/rx.el +++ b/lisp/emacs-lisp/rx.el @@ -1685,6 +1685,10 @@ following constructs: REF can be a number, as usual, or a name introduced by a previous (let REF ...) construct." + ;; FIXME: We can't rely on the surrounding lexical context because + ;; `pcase-defmacro' wraps this function inside an `eval-and-compile', + ;; so we have to repeat the (defvar rx--pcase-vars). + (defvar rx--pcase-vars) (let* ((rx--pcase-vars nil) (regexp (rx--to-expr (rx--pcase-transform (cons 'seq regexps))))) `(and (pred stringp)