[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/progmodes/gud.el, v [EMACS_22_BASE]
From: |
Nick Roberts |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/progmodes/gud.el, v [EMACS_22_BASE] |
Date: |
Thu, 03 Jan 2008 22:00:08 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Branch: EMACS_22_BASE
Changes by: Nick Roberts <nickrob> 08/01/03 22:00:07
Index: gud.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/progmodes/gud.el,v
retrieving revision 1.129.2.13
retrieving revision 1.129.2.14
diff -u -b -r1.129.2.13 -r1.129.2.14
--- gud.el 5 Nov 2007 06:40:26 -0000 1.129.2.13
+++ gud.el 3 Jan 2008 22:00:06 -0000 1.129.2.14
@@ -364,9 +364,10 @@
(defun ,func (arg)
,@(if doc (list doc))
(interactive "p")
+ (if (not gud-running)
,(if (stringp cmd)
`(gud-call ,cmd arg)
- cmd))
+ cmd)))
,(if key `(local-set-key ,(concat "\C-c" key) ',func))
,(if key `(global-set-key (vconcat gud-key-prefix ,key) ',func))))
@@ -458,7 +459,13 @@
["Auto raise frame" gdb-speedbar-auto-raise
:style toggle :selected gdb-speedbar-auto-raise
:visible (memq (buffer-local-value 'gud-minor-mode gud-comint-buffer)
- '(gdbmi gdba))])
+ '(gdbmi gdba))]
+ ("Output Format"
+ :visible (memq (buffer-local-value 'gud-minor-mode gud-comint-buffer)
+ '(gdbmi gdba))
+ ["Binary" (gdb-var-set-format "binary") t]
+ ["Natural" (gdb-var-set-format "natural") t]
+ ["Hexadecimal" (gdb-var-set-format "hexadecimal") t]))
"Additional menu items to add to the speedbar frame.")
;; Make sure our special speedbar mode is loaded
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gud.el, v [EMACS_22_BASE],
Nick Roberts <=