From: Karl Heuer <kwzh@gnu.org>
Date: Tue, 25 Jul 1995 20:27:48 +0000 (+0000)
Subject: (run-hook-with-args): Fix previous code.
X-Git-Tag: emacs-19.34~3196
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=aa681b5110cfd06704ac809714f2516a8a97c992;p=emacs.git

(run-hook-with-args): Fix previous code.
---

diff --git a/src/eval.c b/src/eval.c
index 00f821a085a..53f69ab15e4 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -1836,11 +1836,7 @@ To make a hook variable buffer-local, use `make-local-hook', not\n\
   Lisp_Object sym, val;
 
   sym = args[0];
-  CHECK_SYMBOL (sym, 0);
-  val = XSYMBOL (sym)->value;
-  if (BUFFER_LOCAL_VALUEP (val)
-      || SOME_BUFFER_LOCAL_VALUEP (val))
-    val = swap_in_symval_forwarding (sym, val);
+  val = find_symbol_value (sym);
   if (EQ (val, Qunbound) || NILP (val))
     return Qnil;
   else if (!CONSP (val) || EQ (XCONS (val)->car, Qlambda))