Mercurial > emacs
comparison src/process.c @ 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 | 9cde1228e2fa |
| children | e0680426ff8e |
comparison
equal
deleted
inserted
replaced
| 6747:135dd9df7893 | 6748:b1cde622fa65 |
|---|---|
| 2132 /* We inhibit quit here instead of just catching it so that | 2132 /* We inhibit quit here instead of just catching it so that |
| 2133 hitting ^G when a filter happens to be running won't screw | 2133 hitting ^G when a filter happens to be running won't screw |
| 2134 it up. */ | 2134 it up. */ |
| 2135 int count = specpdl_ptr - specpdl; | 2135 int count = specpdl_ptr - specpdl; |
| 2136 Lisp_Object odeactivate; | 2136 Lisp_Object odeactivate; |
| 2137 Lisp_Object obuffer; | |
| 2137 | 2138 |
| 2138 odeactivate = Vdeactivate_mark; | 2139 odeactivate = Vdeactivate_mark; |
| 2140 obuffer = Fcurrent_buffer (); | |
| 2139 | 2141 |
| 2140 specbind (Qinhibit_quit, Qt); | 2142 specbind (Qinhibit_quit, Qt); |
| 2141 call2 (outstream, proc, make_string (chars, nchars)); | 2143 call2 (outstream, proc, make_string (chars, nchars)); |
| 2142 | 2144 |
| 2143 /* Handling the process output should not deactivate the mark. */ | 2145 /* Handling the process output should not deactivate the mark. */ |
| 2144 Vdeactivate_mark = odeactivate; | 2146 Vdeactivate_mark = odeactivate; |
| 2147 | |
| 2148 if (! EQ (Fcurrent_buffer (), obuffer)) | |
| 2149 record_asynch_buffer_change (); | |
| 2145 | 2150 |
| 2146 #ifdef VMS | 2151 #ifdef VMS |
| 2147 start_vms_process_read (vs); | 2152 start_vms_process_read (vs); |
| 2148 #endif | 2153 #endif |
| 2149 unbind_to (count, Qnil); | 2154 unbind_to (count, Qnil); |
