comparison src/event-stream.c @ 16:0293115a14e9 r19-15b91

Import from CVS: tag r19-15b91
author cvs
date Mon, 13 Aug 2007 08:49:20 +0200
parents 9ee227acff29
children 859a2309aef8
comparison
equal deleted inserted replaced
15:ad457d5f7d04 16:0293115a14e9
2430 time when one calls accept-process-output with a nil argument 2430 time when one calls accept-process-output with a nil argument
2431 and really need the processes to be handled. */ 2431 and really need the processes to be handled. */
2432 || (!EQ (result, Qt) && event_stream_event_pending_p (0))) 2432 || (!EQ (result, Qt) && event_stream_event_pending_p (0)))
2433 { 2433 {
2434 /* If our timeout has arrived, we move along. */ 2434 /* If our timeout has arrived, we move along. */
2435 if (!event_stream_wakeup_pending_p (timeout_id, 0)) 2435 if (timeout_enabled && !event_stream_wakeup_pending_p (timeout_id, 0))
2436 { 2436 {
2437 timeout_enabled = 0; 2437 timeout_enabled = 0;
2438 process = Qnil; /* We're done. */ 2438 process = Qnil; /* We're done. */
2439 } 2439 }
2440 2440