mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-08 04:30:45 -08:00
Fix buffer-stale-function fix
* src/buffer.c (Fmake_indirect_buffer): Kill the local buffer-stale-function variable instead of setting it buffer-locally to the default value. This should have the same effect, but is less confusing.
This commit is contained in:
parent
227f3842c2
commit
f62e1f39be
1 changed files with 1 additions and 2 deletions
|
|
@ -912,7 +912,7 @@ does not run the hooks `kill-buffer-hook',
|
|||
Fset (intern ("buffer-save-without-query"), Qnil);
|
||||
Fset (intern ("buffer-file-number"), Qnil);
|
||||
if (!NILP (Flocal_variable_p (Qbuffer_stale_function, base_buffer)))
|
||||
Fset (Qbuffer_stale_function, Qbuffer_stale__default_function);
|
||||
Fkill_local_variable (Qbuffer_stale_function);
|
||||
/* Cloned buffers need extra setup, to do things such as deep
|
||||
variable copies for list variables that might be mangled due
|
||||
to destructive operations in the indirect buffer. */
|
||||
|
|
@ -6480,7 +6480,6 @@ will run for `clone-indirect-buffer' calls as well. */);
|
|||
DEFSYM (Qkill_buffer__possibly_save, "kill-buffer--possibly-save");
|
||||
|
||||
DEFSYM (Qbuffer_stale_function, "buffer-stale-function");
|
||||
DEFSYM (Qbuffer_stale__default_function, "buffer-stale--default-function");
|
||||
|
||||
Fput (intern_c_string ("erase-buffer"), Qdisabled, Qt);
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue