mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-03 08:30:09 +00:00
Code Issues Releases Activity

(Fkill_buffer, Fkill_all_local_variables):

Browse Source 
Don't call Vrun_hooks if it is nil.
This commit is contained in:
Richard M. Stallman 1994-03-05 20:31:10 +00:00
parent 8746da9580
commit fd186f07f1
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/buffer.c
View File

@ -753,7 +753,8 @@ with `delete-process'.")
}
/* Then run the hooks. */
call1 (Vrun_hooks, Qkill_buffer_hook);
if (!NILP (Vrun_hooks))
call1 (Vrun_hooks, Qkill_buffer_hook);
unbind_to (count, Qnil);
}
@ -1211,7 +1212,8 @@ a non-nil `permanent-local' property are not eliminated by this function.")
register Lisp_Object alist, sym, tem;
Lisp_Object oalist;
call1 (Vrun_hooks, intern ("change-major-mode-hook"));
if (!NILP (Vrun_hooks))
call1 (Vrun_hooks, intern ("change-major-mode-hook"));
oalist = current_buffer->local_var_alist;
/* Make sure no local variables remain set up with this buffer