From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Thu, 23 Aug 2001 22:17:34 +0000 (+0000)
Subject: (electric-buffer-list): Use list-buffers-noselect.
X-Git-Tag: emacs-pretest-21.0.105~98
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cf6ce50be68c02cc4cf4601bb09101418d74a3fe;p=emacs.git

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

diff --git a/lisp/ebuff-menu.el b/lisp/ebuff-menu.el
index d9687771b05..b50dbe88065 100644
--- a/lisp/ebuff-menu.el
+++ b/lisp/ebuff-menu.el
@@ -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)