/[emacs]/emacs/lisp/progmodes/gdb-ui.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/gdb-ui.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.57 by miles, Thu Mar 24 03:25:40 2005 UTC revision 1.58 by nickrob, Fri Mar 25 22:04:45 2005 UTC
# Line 1299  static char *magick[] = { Line 1299  static char *magick[] = {
1299  (defvar gdb-breakpoints-mode-map  (defvar gdb-breakpoints-mode-map
1300    (let ((map (make-sparse-keymap))    (let ((map (make-sparse-keymap))
1301          (menu (make-sparse-keymap "Breakpoints")))          (menu (make-sparse-keymap "Breakpoints")))
1302      (define-key menu [toggle] '("Toggle" . gdb-toggle-breakpoint))      (define-key menu [quit] '("Quit"   . kill-this-buffer))
     (define-key menu [delete] '("Delete" . gdb-delete-breakpoint))  
1303      (define-key menu [goto] '("Goto"   . gdb-goto-breakpoint))      (define-key menu [goto] '("Goto"   . gdb-goto-breakpoint))
1304        (define-key menu [delete] '("Delete" . gdb-delete-breakpoint))
1305        (define-key menu [toggle] '("Toggle" . gdb-toggle-breakpoint))
1306      (suppress-keymap map)      (suppress-keymap map)
1307      (define-key map [menu-bar breakpoints] (cons "Breakpoints" menu))      (define-key map [menu-bar breakpoints] (cons "Breakpoints" menu))
1308      (define-key map " " 'gdb-toggle-breakpoint)      (define-key map " " 'gdb-toggle-breakpoint)
# Line 1310  static char *magick[] = { Line 1310  static char *magick[] = {
1310      (define-key map "q" 'kill-this-buffer)      (define-key map "q" 'kill-this-buffer)
1311      (define-key map "\r" 'gdb-goto-breakpoint)      (define-key map "\r" 'gdb-goto-breakpoint)
1312      (define-key map [mouse-2] 'gdb-goto-breakpoint)      (define-key map [mouse-2] 'gdb-goto-breakpoint)
1313        (define-key map [follow-link] 'mouse-face)
1314      map))      map))
1315    
1316  (defun gdb-breakpoints-mode ()  (defun gdb-breakpoints-mode ()
# Line 1435  static char *magick[] = { Line 1436  static char *magick[] = {
1436      (define-key map "q" 'kill-this-buffer)      (define-key map "q" 'kill-this-buffer)
1437      (define-key map "\r" 'gdb-frames-select)      (define-key map "\r" 'gdb-frames-select)
1438      (define-key map [mouse-2] 'gdb-frames-select)      (define-key map [mouse-2] 'gdb-frames-select)
1439        (define-key map [follow-link] 'mouse-face)
1440      map))      map))
1441    
1442  (defun gdb-frames-mode ()  (defun gdb-frames-mode ()

Legend:
Removed from v.1.57  
changed lines
  Added in v.1.58

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26