Tweak updating the process mark in set-process-buffer
* src/process.c (Fset_process_buffer): Only update the process mark if we actually change the buffer.
This commit is contained in:
parent
d067ac5b9e
commit
d964375ad3
1 changed files with 5 additions and 2 deletions
|
@ -1227,11 +1227,14 @@ Return BUFFER. */)
|
|||
if (!NILP (buffer))
|
||||
CHECK_BUFFER (buffer);
|
||||
p = XPROCESS (process);
|
||||
pset_buffer (p, buffer);
|
||||
if (!EQ (p->buffer, buffer))
|
||||
{
|
||||
pset_buffer (p, buffer);
|
||||
update_process_mark (p);
|
||||
}
|
||||
if (NETCONN1_P (p) || SERIALCONN1_P (p) || PIPECONN1_P (p))
|
||||
pset_childp (p, Fplist_put (p->childp, QCbuffer, buffer));
|
||||
setup_process_coding_systems (process);
|
||||
update_process_mark (p);
|
||||
return buffer;
|
||||
}
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue