From 2a1591f4d431777c7956146aff6d9d1602420d9e Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 9 Jul 2015 13:18:57 -0400 Subject: [PATCH] * lisp/emacs-lisp/debug.el (debug-help-follow): Use describe-symbol. --- lisp/emacs-lisp/debug.el | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el index 77d6332feee..0e307fae70a 100644 --- a/lisp/emacs-lisp/debug.el +++ b/lisp/emacs-lisp/debug.el @@ -731,15 +731,11 @@ Complete list of commands: (buffer-substring (line-beginning-position 0) (line-end-position 0))))) -(declare-function help-xref-interned "help-mode" - (symbol &optional buffer frame)) - (defun debug-help-follow (&optional pos) "Follow cross-reference at POS, defaulting to point. For the cross-reference format, see `help-make-xrefs'." (interactive "d") - (require 'help-mode) ;; Ideally we'd just do (call-interactively 'help-follow) except that this ;; assumes we're already in a *Help* buffer and reuses it, so it ends up ;; incorrectly "reusing" the *Backtrace* buffer to show the help info. @@ -755,7 +751,7 @@ For the cross-reference format, see `help-make-xrefs'." (progn (skip-syntax-forward "w_") (point))))))) (when (or (boundp sym) (fboundp sym) (facep sym)) - (help-xref-interned sym))))) + (describe-symbol sym))))) ;; When you change this, you may also need to change the number of ;; frames that the debugger skips. -- 2.39.5