diff options
author | Karl Heuer <kwzh@gnu.org> | 1995-07-25 20:27:48 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1995-07-25 20:27:48 +0000 |
commit | 291978386cec59c09d49a6f7c52222a96ed6d065 (patch) | |
tree | 455a761ae82a4d7265c5cdb0e8b348e55b0137ac /src/eval.c | |
parent | b2e3d5bbff2a9b1acba0b40f97adfb7cf63fdfb0 (diff) | |
download | emacs-291978386cec59c09d49a6f7c52222a96ed6d065.tar.gz |
(run-hook-with-args): Fix previous code.
Diffstat (limited to 'src/eval.c')
-rw-r--r-- | src/eval.c | 6 |
1 files changed, 1 insertions, 5 deletions
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)) |