From d72534bad1b427571acc6ab4bfd9fc3a4a8202ae Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Fri, 8 Apr 1994 05:58:12 +0000 Subject: [PATCH] (read_process_output): If buffer changes, record that fact. --- src/process.c | 5 +++++ 1 file changed, 5 insertions(+) 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 -- 2.39.5