From: Dmitry Gutov <dmitry@gutov.dev>
Date: Mon, 14 Apr 2025 00:34:42 +0000 (+0300)
Subject: Fix help-customize in describe-symbol buffers
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=86351aab2f0c67a46af69e603937e6a01e7f95ca;p=emacs.git

Fix help-customize in describe-symbol buffers

* lisp/help-fns.el (describe-symbol):
Protect help-mode--current-data from being modified inside the
help-setup-xref call (bug#77510).

(cherry picked from commit f7e34d52dcc175f3205e308ab57e83d7b0515792)
---

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 0fd58594289..2ea4735dccd 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -2027,7 +2027,8 @@ current buffer and the selected frame, respectively."
         (unless single
           ;; Don't record the `describe-variable' item in the stack.
           (setq help-xref-stack-item nil)
-          (help-setup-xref (list #'describe-symbol symbol) nil))
+          (let ((help-mode--current-data help-mode--current-data))
+            (help-setup-xref (list #'describe-symbol symbol) nil)))
         (goto-char (point-max))
         (help-xref--navigation-buttons)
         (goto-char (point-min))))))