diff options
Diffstat (limited to 'lisp/help-mode.el')
| -rw-r--r-- | lisp/help-mode.el | 17 |
1 files changed, 8 insertions, 9 deletions
diff --git a/lisp/help-mode.el b/lisp/help-mode.el index 9924300647c..48c5849d301 100644 --- a/lisp/help-mode.el +++ b/lisp/help-mode.el @@ -505,14 +505,12 @@ that." ((and (or (boundp sym) (get sym 'variable-documentation)) - (condition-case err - (or - (documentation-property - sym 'variable-documentation) - (documentation-property - (indirect-variable sym) - 'variable-documentation)) - (error (message "No doc found: %S" err) nil))) + (or + (documentation-property + sym 'variable-documentation) + (documentation-property + (indirect-variable sym) + 'variable-documentation))) (help-xref-button 8 'help-variable sym)) ((fboundp sym) (help-xref-button 8 'help-function sym))))))) @@ -679,7 +677,8 @@ help buffer." " is also a " "face." "\n\n" facedoc)) ;; Don't record the `describe-function' item in the stack. (setq help-xref-stack-item nil) - (help-setup-xref (list #'help-xref-interned symbol) nil))))))) + (help-setup-xref (list #'help-xref-interned symbol) nil)))) + (goto-char (point-min))))) ;; Navigation/hyperlinking with xrefs |