From: Karl Heuer Date: Fri, 8 Apr 1994 05:58:12 +0000 (+0000) Subject: (read_process_output): If buffer changes, record that fact. X-Git-Tag: emacs-19.34~9105 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d72534bad1b427571acc6ab4bfd9fc3a4a8202ae;p=emacs.git (read_process_output): If buffer changes, record that fact. --- diff --git a/src/process.c b/src/process.c index 67882d5abea..d81b7c9fbab 100644 --- a/src/process.c +++ b/src/process.c @@ -2134,8 +2134,10 @@ read_process_output (proc, channel) it up. */ int count = specpdl_ptr - specpdl; Lisp_Object odeactivate; + Lisp_Object obuffer; odeactivate = Vdeactivate_mark; + obuffer = Fcurrent_buffer (); specbind (Qinhibit_quit, Qt); call2 (outstream, proc, make_string (chars, nchars)); @@ -2143,6 +2145,9 @@ read_process_output (proc, channel) /* Handling the process output should not deactivate the mark. */ Vdeactivate_mark = odeactivate; + if (! EQ (Fcurrent_buffer (), obuffer)) + record_asynch_buffer_change (); + #ifdef VMS start_vms_process_read (vs); #endif