aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/help-mode.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/help-mode.el')
-rw-r--r--lisp/help-mode.el9
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/help-mode.el b/lisp/help-mode.el
index c62ddc3dcd0..564362a0c43 100644
--- a/lisp/help-mode.el
+++ b/lisp/help-mode.el
@@ -621,10 +621,13 @@ See `help-make-xrefs'."
621 621
622 622
623;; Additional functions for (re-)creating types of help buffers. 623;; Additional functions for (re-)creating types of help buffers.
624(defun help-xref-interned (symbol) 624
625;;;###autoload
626(defun help-xref-interned (symbol &optional buffer frame)
625 "Follow a hyperlink which appeared to be an arbitrary interned SYMBOL. 627 "Follow a hyperlink which appeared to be an arbitrary interned SYMBOL.
626Both variable, function and face documentation are extracted into a single 628Both variable, function and face documentation are extracted into a single
627help buffer." 629help buffer. If SYMBOL is a variable, include buffer-local value for optional
630BUFFER or FRAME."
628 (with-current-buffer (help-buffer) 631 (with-current-buffer (help-buffer)
629 ;; Push the previous item on the stack before clobbering the output buffer. 632 ;; Push the previous item on the stack before clobbering the output buffer.
630 (help-setup-xref nil nil) 633 (help-setup-xref nil nil)
@@ -640,7 +643,7 @@ help buffer."
640 (get symbol 'variable-documentation)) 643 (get symbol 'variable-documentation))
641 ;; Don't record the current entry in the stack. 644 ;; Don't record the current entry in the stack.
642 (setq help-xref-stack-item nil) 645 (setq help-xref-stack-item nil)
643 (describe-variable symbol)))) 646 (describe-variable symbol buffer frame))))
644 (cond 647 (cond
645 (sdoc 648 (sdoc
646 ;; We now have a help buffer on the variable. 649 ;; We now have a help buffer on the variable.