From fc95685c412a946084bc4936a49446ace40b0c09 Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Fri, 23 Aug 2024 17:24:19 +0200 Subject: [PATCH] ; * lisp/emacs-lisp/scope.el: Fix typos. --- lisp/emacs-lisp/scope.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/emacs-lisp/scope.el b/lisp/emacs-lisp/scope.el index bccfdbc43fe..d296430c7c6 100644 --- a/lisp/emacs-lisp/scope.el +++ b/lisp/emacs-lisp/scope.el @@ -478,7 +478,7 @@ Optional argument LOCAL is a local context to extend." minimal-match maximal-match group submatch group-n submatch-n)) - (scope-rx (cdr regexp)))))))) + (scope-rx local (cdr regexp)))))))) (defvar scope-assume-func-p nil) @@ -584,7 +584,7 @@ a (possibly empty) list of safe macros.") ((memq bare '(let-when-compile)) ; `let-when-compile' too! (scope-let* local (car forms) (cdr forms))) ((memq bare '(cl-eval-when)) ; Likewise! - (scope-rx local (cdr forms))) + (scope-n local (cdr forms))) ((scope-safe-macro-p bare) (scope-1 local (let ((symbols-with-pos-enabled t)) ;; Ignore errors from trying to expand -- 2.39.5