(add-hook): Doc fix.
This commit is contained in:
parent
e08455275a
commit
2a598462ec
1 changed files with 9 additions and 1 deletions
10
lisp/subr.el
10
lisp/subr.el
|
@ -551,7 +551,15 @@ FUNCTION is added at the end.
|
|||
|
||||
HOOK should be a symbol, and FUNCTION may be any valid function. If
|
||||
HOOK is void, it is first set to nil. If HOOK's value is a single
|
||||
function, it is changed to a list of functions."
|
||||
function, it is changed to a list of functions.
|
||||
|
||||
Note: if you make a hook variable buffer-local, copy its value before
|
||||
you use `add-hook' to add to it. For example,
|
||||
|
||||
(make-local-variable 'foo-hook)
|
||||
(if (boundp 'foo-hook)
|
||||
(setq foo-hook (copy-sequence foo-hook)))
|
||||
(add-hook 'foo-hook 'my-foo-function)"
|
||||
(or (boundp hook) (set hook nil))
|
||||
;; If the hook value is a single function, turn it into a list.
|
||||
(let ((old (symbol-value hook)))
|
||||
|
|
Loading…
Add table
Reference in a new issue