From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Thu, 31 Mar 2022 11:36:40 +0000 (+0200)
Subject: Tweak how functions are formatted in Implementation in *Help*
X-Git-Tag: emacs-29.0.90~1931^2~851
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=af0ea35ea00725d2700a5215b56b725dc0d88d0d;p=emacs.git

Tweak how functions are formatted in Implementation in *Help*

* lisp/emacs-lisp/cl-generic.el (cl--generic-describe): Include
the function name in the implementations (bug#54628).  This
clarifies what we're talking about here, and avoids getting
(function ...) translated into #'...
---

diff --git a/lisp/emacs-lisp/cl-generic.el b/lisp/emacs-lisp/cl-generic.el
index 279f73f36a2..5cbdb9523ac 100644
--- a/lisp/emacs-lisp/cl-generic.el
+++ b/lisp/emacs-lisp/cl-generic.el
@@ -1098,7 +1098,7 @@ MET-NAME is as returned by `cl--generic-load-hist-format'."
         (dolist (method (cl--generic-method-table generic))
           (let* ((info (cl--generic-method-info method)))
             ;; FIXME: Add hyperlinks for the types as well.
-            (insert (format "%s%S" (nth 0 info) (nth 1 info)))
+            (insert (format "%s%S" (nth 0 info) (cons function (nth 1 info))))
             (let* ((met-name (cl--generic-load-hist-format
                               function
                               (cl--generic-method-qualifiers method)