Commit 71c78f01 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(make-local-hook): Return the hook variable.

parent 183040ff
......@@ -566,6 +566,8 @@ Please convert your programs to use the variable `baud-rate' directly."
(defun make-local-hook (hook)
"Make the hook HOOK local to the current buffer.
The return value is HOOK.
When a hook is local, its local and global values
work in concert: running the hook actually runs all the hook
functions listed in *either* the local value *or* the global value
......@@ -586,7 +588,8 @@ Do not use `make-local-variable' to make a hook variable buffer-local."
nil
(or (boundp hook) (set hook nil))
(make-local-variable hook)
(set hook (list t))))
(set hook (list t)))
hook)
(defun add-hook (hook function &optional append local)
"Add to the value of HOOK the function FUNCTION.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment