diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-03-05 20:31:10 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-03-05 20:31:10 +0000 |
| commit | fd186f07f11b4d2e798eec40edf784fa97cebfb7 (patch) | |
| tree | 52518a6d4da83aeabdf6654337221b4c7567cde4 /src | |
| parent | 8746da9580a4465ae1e5e038f4afca7763458ea1 (diff) | |
| download | emacs-fd186f07f11b4d2e798eec40edf784fa97cebfb7.tar.gz | |
(Fkill_buffer, Fkill_all_local_variables):
Don't call Vrun_hooks if it is nil.
Diffstat (limited to 'src')
| -rw-r--r-- | src/buffer.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/buffer.c b/src/buffer.c index 15ed613efd0..007b095a9a8 100644 --- a/src/buffer.c +++ b/src/buffer.c @@ -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 |