From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 25 Dec 2001 08:14:45 +0000 (+0000)
Subject: (debugger-mode-map): Bind C-m, not `RET'.
X-Git-Tag: ttn-vms-21-2-B4~17500
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f27b0335d14f001c7eb517f0389b708da04591ca;p=emacs.git

(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 63e77bb2595..028344612e7 100644
--- 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))))
 
@@ -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)
     ))