summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/derived.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2017-12-18 11:39:17 -0500
committerStefan Monnier <monnier@iro.umontreal.ca>2017-12-18 11:39:17 -0500
commit07b7fb98e6f980bae3dd15375dc8603b7e9cb61c (patch)
tree02ca537df778ebd7b143ea002e12693bd0cf3ccc /lisp/emacs-lisp/derived.el
parenta5b0a4e29243d3cf91e2b5cd365ae9ce0ae48726 (diff)
downloademacs-07b7fb98e6f980bae3dd15375dc8603b7e9cb61c.tar.gz
emacs-07b7fb98e6f980bae3dd15375dc8603b7e9cb61c.tar.bz2
emacs-07b7fb98e6f980bae3dd15375dc8603b7e9cb61c.zip
* lisp/subr.el (delayed-after-hook-functions): Rename from ...-forms
(run-mode-hooks): `funcall` the functions instead of `eval`ing the forms. * lisp/emacs-lisp/derived.el (define-derived-mode): Push functions rather than forms (bug#29679).
Diffstat (limited to 'lisp/emacs-lisp/derived.el')
-rw-r--r--lisp/emacs-lisp/derived.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/derived.el b/lisp/emacs-lisp/derived.el
index 751291afa88..c0ef199424b 100644
--- a/lisp/emacs-lisp/derived.el
+++ b/lisp/emacs-lisp/derived.el
@@ -285,7 +285,7 @@ No problems result if this variable is not bound.
(run-mode-hooks ',hook)
,@(when after-hook
`((if delay-mode-hooks
- (push ',after-hook delayed-after-hook-forms)
+ (push (lambda () ,after-hook) delayed-after-hook-functions)
,after-hook)))))))
;; PUBLIC: find the ultimate class of a derived mode.