emacs-diffs
[Top][All Lists]
Advanced

[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)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]