Mercurial > emacs

changeset 58955:58f1100f0a9e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Buffer-menu-switch-other-window): Bind pop-up-windows to t. (Buffer-menu-switch-other-window, Buffer-menu-2-window): Bind same-window-buffer-names and same-window-regexps to nil.
author Juri Linkov <juri@jurta.org>
date Tue, 14 Dec 2004 02:33:36 +0000
parents bb8424d9ff97
children 2a924b8ffcc0
files lisp/buff-menu.el
diffstat 1 files changed, 7 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/buff-menu.el	Tue Dec 14 02:24:33 2004 +0000
+++ b/lisp/buff-menu.el	Tue Dec 14 02:33:36 2004 +0000
@@ -484,14 +484,19 @@
   "Make the other window select this line's buffer.
 The current window remains selected."
   (interactive)
-  (display-buffer (Buffer-menu-buffer t)))
+  (let ((pop-up-windows t)
+	same-window-buffer-names
+	same-window-regexps)
+    (display-buffer (Buffer-menu-buffer t))))
 
 (defun Buffer-menu-2-window ()
   "Select this line's buffer, with previous buffer in second window."
   (interactive)
   (let ((buff (Buffer-menu-buffer t))
 	(menu (current-buffer))
-	(pop-up-windows t))
+	(pop-up-windows t)
+	same-window-buffer-names
+	same-window-regexps)
     (delete-other-windows)
     (switch-to-buffer (other-buffer))
     (pop-to-buffer buff)