# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 769681383 0
# Node ID ed3bbbdd9ef5f9d250e852c86c1a5aa21128367a
# Parent  c06b9bcb12e736bfdf912b20c0c2bef83be99388
(Buffer-menu-mouse-select): Handle dedicated window.

diff -r c06b9bcb12e7 -r ed3bbbdd9ef5 lisp/buff-menu.el
--- 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."