Mercurial > emacs
changeset 13159:2af96ac471bc
(exec_sentinel, read_process_output):
Call record_asynch_buffer_change only if caller is reading kbd input.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 09 Oct 1995 00:31:24 +0000 |
| parents | 02b3310fc081 |
| children | 1b2a4a45f089 |
| files | src/process.c |
| diffstat | 1 files changed, 10 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/process.c Sun Oct 08 19:59:42 1995 +0000 +++ b/src/process.c Mon Oct 09 00:31:24 1995 +0000 @@ -2393,7 +2393,11 @@ if (! EQ (Fcurrent_buffer (), obuffer) || ! EQ (current_buffer->keymap, okeymap)) #endif - record_asynch_buffer_change (); + /* But do it only if the caller is actually going to read events. + Otherwise there's no need to make him wake up, and it could + cause trouble (for example it would make Fsit_for return). */ + if (waiting_for_user_input_p == -1) + record_asynch_buffer_change (); #ifdef VMS start_vms_process_read (vs); @@ -3391,7 +3395,11 @@ if (! EQ (Fcurrent_buffer (), obuffer) || ! EQ (current_buffer->keymap, okeymap)) #endif - record_asynch_buffer_change (); + /* But do it only if the caller is actually going to read events. + Otherwise there's no need to make him wake up, and it could + cause trouble (for example it would make Fsit_for return). */ + if (waiting_for_user_input_p == -1) + record_asynch_buffer_change (); unbind_to (count, Qnil); }