[Emacs-diffs] master b3500fc: Make the minor modes in help buffers into buttons

[Lars Ingebrigtsen]

branch: master
commit b3500fc058ed4f294969b1ef1bf36b28bb3ebe43
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Make the minor modes in help buffers into buttons
    
    * lisp/help.el (describe-mode): Make the minor modes into
    buttons to enable easier documentation traversal (bug#1149).
---
 lisp/help.el |    7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/lisp/help.el b/lisp/help.el
index baccf59..efbae39 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -946,14 +946,15 @@ documentation for the major and minor modes of that 
buffer."
              (let ((mode-function (nth 0 mode))
                    (pretty-minor-mode (nth 1 mode))
                    (indicator (nth 2 mode)))
-               (add-text-properties 0 (length pretty-minor-mode)
-                                    '(face bold) pretty-minor-mode)
                (save-excursion
                  (goto-char (point-max))
                  (princ "\n\f\n")
                  (push (point-marker) help-button-cache)
                  ;; Document the minor modes fully.
-                 (insert pretty-minor-mode)
+                  (insert-text-button
+                   pretty-minor-mode 'type 'help-function
+                   'help-args (list mode-function)
+                   'button '(t))
                  (princ (format " minor mode (%s):\n"
                                 (if (zerop (length indicator))
                                     "no indicator"