(electric-buffer-list): Use list-buffers-noselect.

This commit is contained in:
Stefan Monnier 2001-08-23 22:17:34 +00:00
parent 3da17c12e8
commit cf6ce50be6

View file

@ -58,8 +58,8 @@ Calls value of `electric-buffer-menu-mode-hook' on entry if non-nil.
(interactive "P")
(let (select buffer)
(save-window-excursion
(save-window-excursion (list-buffers arg))
(setq buffer (window-buffer (Electric-pop-up-window "*Buffer List*")))
(setq buffer (list-buffers-noselect arg))
(Electric-pop-up-window buffer)
(unwind-protect
(progn
(set-buffer buffer)