From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 9 Mar 1994 04:17:47 +0000 (+0000)
Subject: (Fselect_window): Don't select an inactive minibuffer.
X-Git-Tag: emacs-19.34~9585
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=671cfd1aa3792fa1aff4b488097924eeb88e15e4;p=emacs.git

(Fselect_window): Don't select an inactive minibuffer.
---

diff --git a/src/window.c b/src/window.c
index 3d807342346..6b6296a807c 100644
--- a/src/window.c
+++ b/src/window.c
@@ -1657,6 +1657,10 @@ before each command.")
 
   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");