From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Tue, 21 Jun 2022 11:33:02 +0000 (+0200)
Subject: Make describe-key do doc string command key substitution again
X-Git-Tag: emacs-29.0.90~1447^2~1568
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ef03c8852d064da127a1deea263b2dcec5ea5bf8;p=emacs.git

Make describe-key do doc string command key substitution again

* lisp/help.el (describe-key): Do doc string command key
substitution (bug#56106).
---

diff --git a/lisp/help.el b/lisp/help.el
index 1c46f253381..94747ff4b0f 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -933,6 +933,7 @@ current buffer."
     (setq buffer nil))
   (let* ((help-buffer-under-preparation t)
          (buf (or buffer (current-buffer)))
+         (describe-function-orig-buffer buf)
          (on-link
           (mapcar (lambda (kr)
                     (let ((raw (cdr kr)))