comparison src/callint.c @ 6271:264f353c5b00

Fix typo in previous change.
author Karl Heuer <kwzh@gnu.org>
date Wed, 09 Mar 1994 06:13:36 +0000
parents 853b88dd9945
children 00475922df29
comparison
equal deleted inserted replaced
6270:853b88dd9945 6271:264f353c5b00
327 if (EVENT_HAS_PARAMETERS (event) 327 if (EVENT_HAS_PARAMETERS (event)
328 && XTYPE (event = XCONS (event)->cdr) == Lisp_Cons 328 && XTYPE (event = XCONS (event)->cdr) == Lisp_Cons
329 && XTYPE (event = XCONS (event)->car) == Lisp_Cons 329 && XTYPE (event = XCONS (event)->car) == Lisp_Cons
330 && XTYPE (event = XCONS (event)->car) == Lisp_Window) 330 && XTYPE (event = XCONS (event)->car) == Lisp_Window)
331 { 331 {
332 if (MINI_WINDOW_P (XWINDOW (window)) 332 if (MINI_WINDOW_P (XWINDOW (event))
333 && NILP (call1 (intern ("minibuffer-window-active-p"), 333 && NILP (call1 (intern ("minibuffer-window-active-p"),
334 window))) 334 event)))
335 error ("Attempt to select inactive minibuffer window"); 335 error ("Attempt to select inactive minibuffer window");
336 Fselect_window (event); 336 Fselect_window (event);
337 } 337 }
338 string++; 338 string++;
339 } 339 }