diff options
| author | Nick Roberts <nickrob@snap.net.nz> | 2006-11-26 23:08:36 +0000 |
|---|---|---|
| committer | Nick Roberts <nickrob@snap.net.nz> | 2006-11-26 23:08:36 +0000 |
| commit | f2c246e35cca59c98add4a51e5abd23fdc7209c9 (patch) | |
| tree | 39760637ae7c001bdc7492861ce97a205eb33104 | |
| parent | 0a43e4271977b4f43b3e8dc100cb13e6ecfa6ae1 (diff) | |
| download | emacs-f2c246e35cca59c98add4a51e5abd23fdc7209c9.tar.gz | |
(speedbar-timer-fn): Revert to old behaviour when not
in GUD mode.
| -rw-r--r-- | lisp/speedbar.el | 10 |
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))))) |