(speedbar-timer-fn): Revert to old behaviour when not

in GUD mode.

diff --git a/lisp/speedbar.el b/lisp/speedbar.el
index aa09e0188030477994f5b68f459c18f6910dafd2..01357cb380a2d2a217a233fcbc2cfa34b6f98ab9 100644 (file)
--- a/lisp/speedbar.el
+++ b/lisp/speedbar.el
@@ -2681,7 +2681,15 @@ Also resets scanner functions."
                             "Updating speedbar to special mode: %s...done"
                             major-mode)
                            (speedbar-message nil))))
-                   (speedbar-update-localized-contents))
+
+                 ;; Update all the contents if directories change!
+                 (unless (and (or (member major-mode speedbar-ignored-modes)
+                                  (eq af (speedbar-current-frame))
+                                  (not (buffer-file-name)))
+                              ;; Always update for GUD.
+                              (not (string-equal "GUD"
+                                    speedbar-initial-expansion-list-name)))
+                   (speedbar-update-localized-contents)))
                (select-frame af))
            ;; Now run stealthy updates of time-consuming items
            (speedbar-stealthy-updates)))))