summaryrefslogtreecommitdiff
path: root/lisp/speedbar.el
diff options
context:
space:
mode:
authorNick Roberts <nickrob@snap.net.nz>2006-11-26 23:08:36 +0000
committerNick Roberts <nickrob@snap.net.nz>2006-11-26 23:08:36 +0000
commitf2c246e35cca59c98add4a51e5abd23fdc7209c9 (patch)
tree39760637ae7c001bdc7492861ce97a205eb33104 /lisp/speedbar.el
parent0a43e4271977b4f43b3e8dc100cb13e6ecfa6ae1 (diff)
downloademacs-f2c246e35cca59c98add4a51e5abd23fdc7209c9.tar.gz
(speedbar-timer-fn): Revert to old behaviour when not
in GUD mode.
Diffstat (limited to 'lisp/speedbar.el')
-rw-r--r--lisp/speedbar.el10
1 files changed, 9 insertions, 1 deletions
diff --git a/lisp/speedbar.el b/lisp/speedbar.el
index aa09e018803..01357cb380a 100644
--- 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)))))