comparison src/callint.c @ 48630:edd0dd275f1f

(Fcall_interactively): Use next_event only if less than key_count.
author Andreas Schwab <schwab@suse.de>
date Mon, 02 Dec 2002 23:30:54 +0000
parents ba7cb9f8dfc3
children 23a1cea22d13
comparison
equal deleted inserted replaced
48629:cf1e5fbb7a61 48630:edd0dd275f1f
407 string++; 407 string++;
408 else if (*string == '@') 408 else if (*string == '@')
409 { 409 {
410 Lisp_Object event; 410 Lisp_Object event;
411 411
412 event = XVECTOR (keys)->contents[next_event]; 412 event = (next_event < key_count
413 ? XVECTOR (keys)->contents[next_event]
414 : Qnil);
413 if (EVENT_HAS_PARAMETERS (event) 415 if (EVENT_HAS_PARAMETERS (event)
414 && (event = XCDR (event), CONSP (event)) 416 && (event = XCDR (event), CONSP (event))
415 && (event = XCAR (event), CONSP (event)) 417 && (event = XCAR (event), CONSP (event))
416 && (event = XCAR (event), WINDOWP (event))) 418 && (event = XCAR (event), WINDOWP (event)))
417 { 419 {