* 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).
This commit is contained in:
Stefan Monnier 2017-12-18 11:39:17 -05:00
parent a5b0a4e292
commit 07b7fb98e6
3 changed files with 51 additions and 7 deletions

View file

@ -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.