# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 763186667 0
# Node ID c10a162546f09dfa07319f140aaa470db1b89e50
# Parent  66c0ed95c03f625f0649c01b4a40d4634bad572f
(Fselect_window): Don't select an inactive minibuffer.

diff -r 66c0ed95c03f -r c10a162546f0 src/window.c
--- a/src/window.c	Wed Mar 09 04:00:12 1994 +0000
+++ b/src/window.c	Wed Mar 09 04:17:47 1994 +0000
@@ -1657,6 +1657,10 @@
 
   w = XWINDOW (window);
 
+  if (MINI_WINDOW_P (w)
+      && NILP (call1 (intern ("minibuffer-window-active-p"), window)))
+    error ("Attempt to select inactive minibuffer window");
+
   if (NILP (w->buffer))
     error ("Trying to select deleted window or non-leaf window");