Mercurial > emacs
changeset 4875:78a52ca82a71
(make-frame): Use before-make-frame-hook and after-make-frame-hook.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 24 Oct 1993 03:18:18 +0000 |
| parents | 20154e6389eb |
| children | 8ddcaee25a73 |
| files | lisp/frame.el |
| diffstat | 1 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/frame.el Fri Oct 22 17:12:54 1993 +0000 +++ b/lisp/frame.el Sun Oct 24 03:18:18 1993 +0000 @@ -319,7 +319,11 @@ The documentation for the function `x-create-frame' describes additional frame parameters that Emacs recognizes for X window frames." (interactive) - (funcall frame-creation-function parameters)) + (let ((nframe)) + (run-hooks 'before-make-frame-hook) + (setq nframe (funcall frame-creation-function parameters)) + (run-hooks 'after-make-frame-hook) + nframe)) (defun filtered-frame-list (predicate) "Return a list of all live frames which satisfy PREDICATE."