Mercurial > emacs

comparison lisp/subr.el @ 83211:b85b19b8eb65

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merged in changes from CVS trunk. Patches applied: * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-567 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-568 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-569 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-570 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-571 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-572 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-573 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-574 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-575 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-576 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-577 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-578 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-579 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-580 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-31 Update from CVS * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-32 Update from CVS * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-33 Update from CVS * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-34 Merge from emacs--cvs-trunk--0 * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-35 Update from CVS * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-36 Update from CVS * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-37 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-251
author Karoly Lorentey <lorentey@elte.hu>
date Wed, 29 Sep 2004 08:38:15 +0000
parents c06211125947 3bd3c7450f87
children 4f2f1522636c
comparison
equal deleted inserted replaced
83210:e2877f047180 83211:b85b19b8eb65
1968 (apply 'run-hooks hooks) 1968 (apply 'run-hooks hooks)
1969 (run-hooks 'after-change-major-mode-hook))) 1969 (run-hooks 'after-change-major-mode-hook)))
1970 1970
1971 (defmacro delay-mode-hooks (&rest body) 1971 (defmacro delay-mode-hooks (&rest body)
1972 "Execute BODY, but delay any `run-mode-hooks'. 1972 "Execute BODY, but delay any `run-mode-hooks'.
1973 These hooks will be executed by the first following call to
1974 `run-mode-hooks' that occurs outside any `delayed-mode-hooks' form.
1973 Only affects hooks run in the current buffer." 1975 Only affects hooks run in the current buffer."
1974 (declare (debug t)) 1976 (declare (debug t))
1975 `(progn 1977 `(progn
1976 (make-local-variable 'delay-mode-hooks) 1978 (make-local-variable 'delay-mode-hooks)
1977 (let ((delay-mode-hooks t)) 1979 (let ((delay-mode-hooks t))