diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2016-04-27 18:43:02 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2016-04-27 18:43:02 +0200 |
commit | b3500fc058ed4f294969b1ef1bf36b28bb3ebe43 (patch) | |
tree | 65dc6db55e7da86a68cd9cdf0127deadaf0bdec6 /lisp | |
parent | 1a08fb07546a4488511abb65bcae5c0d8b192c20 (diff) | |
download | emacs-b3500fc058ed4f294969b1ef1bf36b28bb3ebe43.tar.gz |
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).
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/help.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/help.el b/lisp/help.el index baccf5988b8..efbae39a002 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" |