diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2004-01-21 05:27:58 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2004-01-21 05:27:58 +0000 |
| commit | 43ff45a00d1fc6e108c99d35b1f7ec9c844f1825 (patch) | |
| tree | a79791630019cbda4205a9014b485b1d39aa6b41 | |
| parent | 35d3b513d31907715da05d815b9ca0a13a206423 (diff) | |
| download | emacs-43ff45a00d1fc6e108c99d35b1f7ec9c844f1825.tar.gz emacs-43ff45a00d1fc6e108c99d35b1f7ec9c844f1825.tar.bz2 emacs-43ff45a00d1fc6e108c99d35b1f7ec9c844f1825.zip | |
(wait_reading_process_input) [SYNC_INPUT]: Check interrupt_input_pending.
| -rw-r--r-- | src/process.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/process.c b/src/process.c index 854607a2230..fec6fdb2660 100644 --- a/src/process.c +++ b/src/process.c @@ -4080,6 +4080,10 @@ wait_reading_process_input (time_limit, microsecs, read_kbd, do_display) Otherwise, do pending quit if requested. */ if (XINT (read_kbd) >= 0) QUIT; +#ifdef SYNC_INPUT + else if (interrupt_input_pending) + handle_async_input (); +#endif /* Exit now if the cell we're waiting for became non-nil. */ if (! NILP (wait_for_cell) && ! NILP (XCAR (wait_for_cell))) |