From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 5 Mar 1994 20:31:10 +0000 (+0000)
Subject: (Fkill_buffer, Fkill_all_local_variables):
X-Git-Tag: emacs-19.34~9647
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fd186f07f11b4d2e798eec40edf784fa97cebfb7;p=emacs.git

(Fkill_buffer, Fkill_all_local_variables):
Don't call Vrun_hooks if it is nil.
---

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