changeset 6182:472277144da6

(server-switch-buffer): Don't select a minibuffer.
author Karl Heuer <kwzh@gnu.org>
date Thu, 03 Mar 1994 21:13:08 +0000
parents dd271c6b4e56
children 242d3fed9285
files lisp/server.el
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/server.el	Thu Mar 03 21:01:37 1994 +0000
+++ b/lisp/server.el	Thu Mar 03 21:13:08 1994 +0000
@@ -326,6 +326,8 @@
 	 (select-window server-window))
 	((framep server-window)
 	 (select-window (frame-selected-window server-window))))
+  (if (window-minibuffer-p (selected-window))
+      (select-window (next-window nil 'nomini t)))
   (if next-buffer
       (if (and (bufferp next-buffer)
 	       (buffer-name next-buffer))