Make help--describe-command more robust

* lisp/help.el (help--describe-command): `help-function' buttons
are defined in help-mode.el, so it might not exist yet when
calling `documentation' directly (bug#52291).

diff --git a/lisp/help.el b/lisp/help.el
index adb2bd87a940a28cd594ec20fc77282d6e7b8a1b..eb0a78222726e4bbac6de7b5aaf00315e8ab6d72 100644 (file)
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -1353,7 +1353,8 @@ Return nil if the key sequence is too long."
 
 (defun help--describe-command (definition &optional translation)
   (cond ((symbolp definition)
-         (if (fboundp definition)
+         (if (and (fboundp definition)
+                  help-buffer-under-preparation)
              (insert-text-button (symbol-name definition)
                                  'type 'help-function
                                  'help-args (list definition))