diff options
Diffstat (limited to 'lisp/help-mode.el')
| -rw-r--r-- | lisp/help-mode.el | 9 |
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. |
| 626 | Both variable, function and face documentation are extracted into a single | 628 | Both variable, function and face documentation are extracted into a single |
| 627 | help buffer." | 629 | help buffer. If SYMBOL is a variable, include buffer-local value for optional |
| 630 | BUFFER 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. |