From d0659190ead8ee257bb84329aa3492976bf532e8 Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Mon, 23 Dec 2024 21:50:17 +0100 Subject: [PATCH] scope.el: Disregard symbol shorthands --- lisp/emacs-lisp/scope.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/scope.el b/lisp/emacs-lisp/scope.el index 682a3f2c443..75ca7ef9404 100644 --- a/lisp/emacs-lisp/scope.el +++ b/lisp/emacs-lisp/scope.el @@ -681,7 +681,8 @@ starting with a top-level form, by inspecting HEAD at each level: by default it is similarly ignored, but if `scope-assume-func-p' is non-nil, then this function assumes that such HEADs are functions." (let ((scope-counter 0) - (scope-callback callback)) + (scope-callback callback) + (read-symbol-shorthands nil)) (scope-1 nil (read-positioning-symbols (or stream (current-buffer))) t))) (provide 'scope) -- 2.39.5