From: Eshel Yaron <me@eshelyaron.com>
Date: Mon, 23 Dec 2024 20:50:17 +0000 (+0100)
Subject: scope.el: Disregard symbol shorthands
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d0659190ead8ee257bb84329aa3492976bf532e8;p=emacs.git

scope.el: Disregard symbol shorthands
---

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)