# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 763193616 0
# Node ID 264f353c5b009eb5f04306b7f6ec079747a0e862
# Parent  853b88dd99456bcd758f1bc0c9233fa0f7c3fcc8
Fix typo in previous change.

diff -r 853b88dd9945 -r 264f353c5b00 src/callint.c
--- a/src/callint.c	Wed Mar 09 06:07:43 1994 +0000
+++ b/src/callint.c	Wed Mar 09 06:13:36 1994 +0000
@@ -329,9 +329,9 @@
 	      && XTYPE (event = XCONS (event)->car) == Lisp_Cons
 	      && XTYPE (event = XCONS (event)->car) == Lisp_Window)
 	    {
-	      if (MINI_WINDOW_P (XWINDOW (window))
+	      if (MINI_WINDOW_P (XWINDOW (event))
 		  && NILP (call1 (intern ("minibuffer-window-active-p"),
-				  window)))
+				  event)))
 		error ("Attempt to select inactive minibuffer window");
 	      Fselect_window (event);
 	    }