[Emacs-diffs] Changes to emacs/lisp/progmodes/gud.el

[Nick Roberts]

Index: emacs/lisp/progmodes/gud.el
diff -u emacs/lisp/progmodes/gud.el:1.87 emacs/lisp/progmodes/gud.el:1.88
--- emacs/lisp/progmodes/gud.el:1.87    Tue Feb 14 22:02:21 2006
+++ emacs/lisp/progmodes/gud.el Fri Feb 17 11:50:48 2006
@@ -467,10 +467,12 @@
                                            (concat (car var) "\t" (nth 4 var))
                                            'gdb-edit-value
                                            nil
-                                           (if (and (nth 5 var)
-                                                    gdb-show-changed-values)
-                                               'font-lock-warning-face
-                                             nil) depth)
+                      (if gdb-show-changed-values
+                          (case (nth 5 var)
+                                (changed 'font-lock-warning-face)
+                                (out-of-scope 'shadow)
+                                (nil nil))
+                        nil) depth)
                  (if (and (cadr var-list)
                           (string-match (concat varnum "\\.")
                                         (cadr (cadr var-list))))
@@ -493,11 +495,10 @@
                                          nil nil nil depth))))
              (setq var-list (cdr var-list))))
          (setq gdb-var-changed nil)))
-       (t (if (and (save-excursion
-                    (goto-char (point-min))
-                    (looking-at "Current Stack:"))
-                  (equal gud-last-last-frame gud-last-speedbar-stackframe))
-             nil
+       (t (unless (and (save-excursion
+                        (goto-char (point-min))
+                        (looking-at "Current Stack:"))
+                      (equal gud-last-last-frame gud-last-speedbar-stackframe))
            (let ((gud-frame-list
            (cond ((eq minor-mode 'gdb)
                   (gud-gdb-get-stackframe buffer))