[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el,v
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el,v |
Date: |
Fri, 09 Nov 2007 09:45:48 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Miles Bader <miles> 07/11/09 09:45:31
Index: lisp/progmodes/gdb-ui.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/progmodes/gdb-ui.el,v
retrieving revision 1.212
retrieving revision 1.213
diff -u -b -r1.212 -r1.213
--- lisp/progmodes/gdb-ui.el 15 Oct 2007 02:07:51 -0000 1.212
+++ lisp/progmodes/gdb-ui.el 9 Nov 2007 09:45:28 -0000 1.213
@@ -947,6 +947,12 @@
:group 'gud
:version "22.1")
+(defcustom gdb-delete-out-of-scope t
+ "If non-nil delete watch expressions automatically when they go out of
scope."
+ :type 'boolean
+ :group 'gud
+ :version "22.2")
+
(defun gdb-speedbar-expand-node (text token indent)
"Expand the node the user clicked on.
TEXT is the text of the button we clicked on, a + or - item.
@@ -3515,7 +3521,9 @@
(when var
(let ((match (match-string 3)))
(cond ((string-equal match "false")
- (setcar (nthcdr 5 var) 'out-of-scope))
+ (if gdb-delete-out-of-scope
+ (gdb-var-delete-1 varnum)
+ (setcar (nthcdr 5 var) 'out-of-scope)))
((string-equal match "true")
(setcar (nthcdr 5 var) 'changed)
(setcar (nthcdr 4 var)
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el,v,
Miles Bader <=