changeset 6748:b1cde622fa65

(read_process_output): If buffer changes, record that fact.
author Karl Heuer <kwzh@gnu.org>
date Fri, 08 Apr 1994 05:58:12 +0000
parents 135dd9df7893
children c409eb264509
files src/process.c
diffstat 1 files changed, 5 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/process.c	Fri Apr 08 05:57:55 1994 +0000
+++ b/src/process.c	Fri Apr 08 05:58:12 1994 +0000
@@ -2134,8 +2134,10 @@
 	 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 @@
       /* 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