From aa681b5110cfd06704ac809714f2516a8a97c992 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Tue, 25 Jul 1995 20:27:48 +0000 Subject: [PATCH] (run-hook-with-args): Fix previous code. --- src/eval.c | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/src/eval.c b/src/eval.c index 00f821a085..53f69ab15e 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)) -- 2.20.1