(read_process_output): If buffer changes, record that fact.

diff --git a/src/process.c b/src/process.c
index 67882d5abea398e92f09e5050b2cf51d2be0f8a5..d81b7c9fbab7889ba2a3760142413a2a4e32eec8 100644 (file)
--- 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