# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 998605054 0
# Node ID 86b624b00b777400b5c776ad528cb480cd28a016
# Parent  53166863c34af4e4ff64eccdf175a77a60b97eaf
(electric-buffer-list): Use list-buffers-noselect.

diff -r 53166863c34a -r 86b624b00b77 lisp/ebuff-menu.el
--- a/lisp/ebuff-menu.el	Thu Aug 23 14:25:42 2001 +0000
+++ b/lisp/ebuff-menu.el	Thu Aug 23 22:17:34 2001 +0000
@@ -58,8 +58,8 @@
   (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)