summaryrefslogtreecommitdiff
path: root/lisp/help-mode.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/help-mode.el')
-rw-r--r--lisp/help-mode.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/help-mode.el b/lisp/help-mode.el
index bcf15c54f77..087e4f159df 100644
--- a/lisp/help-mode.el
+++ b/lisp/help-mode.el
@@ -365,6 +365,9 @@ that."
;;; (pop-to-buffer (car location))
;;; (goto-char (cdr location))))
(help-xref-button 8 'help-function-def sym))
+ ((facep sym)
+ (if (save-match-data (looking-at "[ \t\n]+face\\W"))
+ (help-xref-button 8 'help-face sym)))
((and (boundp sym) (fboundp sym))
;; We can't intuit whether to use the
;; variable or function doc -- supply both.
@@ -375,10 +378,7 @@ that."
'variable-documentation))
(help-xref-button 8 'help-variable sym))
((fboundp sym)
- (help-xref-button 8 'help-function sym))
- ((facep sym)
- (if (save-match-data (looking-at "[ \t\n]+face\\W"))
- (help-xref-button 8 'help-face sym))))))))
+ (help-xref-button 8 'help-function sym)))))))
;; An obvious case of a key substitution:
(save-excursion
(while (re-search-forward