(debugger-mode-map): Bind C-m, not `RET'.

(debugger-make-xrefs): Only make a button for the first symbol on any line.

diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el
index 63e77bb2595e2ba46eecac1fff0e1a69f202ba05..028344612e71d3b43d46c888f7ba41a16cbfdc40 100644 (file)
--- a/lisp/emacs-lisp/debug.el
+++ b/lisp/emacs-lisp/debug.el
@@ -337,7 +337,8 @@ That buffer should be current already."
            ;; help-xref-button needs to operate on something matched
            ;; by a regexp, so set that up for it.
            (re-search-forward "\\(\\(\\sw\\|\\s_\\)+\\)")
-           (help-xref-button 1 'help-function-def sym file))))
+           (help-xref-button 1 'help-function-def sym file)))
+       (forward-line 1))
       (widen))
     (setq debugger-previous-backtrace (buffer-string))))
 \f
@@ -530,7 +531,7 @@ Applies to the frame whose line point is on in the backtrace."
     (define-key debugger-mode-map "e" 'debugger-eval-expression)
     (define-key debugger-mode-map " " 'next-line)
     (define-key debugger-mode-map "R" 'debugger-record-expression)
-    (define-key debugger-mode-map [RET] 'help-follow)
+    (define-key debugger-mode-map "\C-m" 'help-follow)
     (define-key debugger-mode-map [mouse-2] 'push-button)
     ))