Mercurial > emacs
diff lisp/progmodes/gdb-ui.el @ 90133:4da4a09e8b1b
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-31
Merge from emacs--cvs-trunk--0
Patches applied:
* emacs--cvs-trunk--0 (patch 206-222)
- Update from CVS
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 45-52)
- Update from CVS
- Update from CVS: texi Makefile.in CVS keyw cruft
- Update from CVS: ChangeLog tweaks
author | Miles Bader <miles@gnu.org> |
---|---|
date | Thu, 31 Mar 2005 09:58:14 +0000 |
parents | 13796b0653c7 a44ce059d2d1 |
children | 146c086df160 |
line wrap: on
line diff
--- a/lisp/progmodes/gdb-ui.el Tue Mar 29 00:48:14 2005 +0000 +++ b/lisp/progmodes/gdb-ui.el Thu Mar 31 09:58:14 2005 +0000 @@ -1299,10 +1299,10 @@ (defvar gdb-breakpoints-mode-map (let ((map (make-sparse-keymap)) (menu (make-sparse-keymap "Breakpoints"))) - (define-key menu [toggle] '("Toggle" . gdb-toggle-breakpoint)) + (define-key menu [quit] '("Quit" . kill-this-buffer)) + (define-key menu [goto] '("Goto" . gdb-goto-breakpoint)) (define-key menu [delete] '("Delete" . gdb-delete-breakpoint)) - (define-key menu [goto] '("Goto" . gdb-goto-breakpoint)) - + (define-key menu [toggle] '("Toggle" . gdb-toggle-breakpoint)) (suppress-keymap map) (define-key map [menu-bar breakpoints] (cons "Breakpoints" menu)) (define-key map " " 'gdb-toggle-breakpoint) @@ -1310,6 +1310,7 @@ (define-key map "q" 'kill-this-buffer) (define-key map "\r" 'gdb-goto-breakpoint) (define-key map [mouse-2] 'gdb-goto-breakpoint) + (define-key map [follow-link] 'mouse-face) map)) (defun gdb-breakpoints-mode () @@ -1435,6 +1436,7 @@ (define-key map "q" 'kill-this-buffer) (define-key map "\r" 'gdb-frames-select) (define-key map [mouse-2] 'gdb-frames-select) + (define-key map [follow-link] 'mouse-face) map)) (defun gdb-frames-mode ()