Mercurial > emacs
diff lisp/buff-menu.el @ 7659:ed3bbbdd9ef5
(Buffer-menu-mouse-select): Handle dedicated window.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 23 May 1994 08:23:03 +0000 |
parents | 4fd40bd394fe |
children | 6b104526819d |
line wrap: on
line diff
--- a/lisp/buff-menu.el Mon May 23 07:47:27 1994 +0000 +++ b/lisp/buff-menu.el Mon May 23 08:23:03 1994 +0000 @@ -346,7 +346,10 @@ (goto-char (posn-point (event-end event))) (setq buffer (Buffer-menu-buffer t)))) (select-window (posn-window (event-end event))) - (switch-to-buffer buffer))) + (if (and (window-dedicated-p (selected-window)) + (eq (selected-window) (frame-root-window))) + (switch-to-buffer-other-frame buffer) + (switch-to-buffer buffer)))) (defun Buffer-menu-this-window () "Select this line's buffer in this window."