Mercurial > emacs
changeset 47627:33bcb75e91e8
(speedbar-refresh): Simply bind deactivate-mark.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 26 Sep 2002 21:57:00 +0000 |
| parents | 9e91beee44a6 |
| children | e44b96f09893 |
| files | lisp/speedbar.el |
| diffstat | 1 files changed, 2 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/speedbar.el Thu Sep 26 21:56:42 2002 +0000 +++ b/lisp/speedbar.el Thu Sep 26 21:57:00 2002 +0000 @@ -1676,7 +1676,7 @@ "Refresh the current speedbar display, disposing of any cached data." (interactive) (let ((dl speedbar-shown-directories) - (dm (and (boundp 'deactivate-mark) deactivate-mark))) + deactivate-mark) (while dl (adelete 'speedbar-directory-contents-alist (car dl)) (setq dl (cdr dl))) @@ -1687,8 +1687,7 @@ ;; Reset the timer in case it got really hosed for some reason... (speedbar-set-timer speedbar-update-speed) (if (<= 1 speedbar-verbosity-level) - (speedbar-message "Refreshing speedbar...done")) - (if (boundp 'deactivate-mark) (setq deactivate-mark dm)))) + (speedbar-message "Refreshing speedbar...done")))) (defun speedbar-item-load () "Load the item under the cursor or mouse if it is a Lisp file."