Mercurial > emacs
changeset 97963:55bef47f5e9f
(pop-up-frame-function): Move here from window.el to avoid
"CHANGED outside Customize;".
| author | Martin Rudalics <rudalics@gmx.at> |
|---|---|
| date | Wed, 03 Sep 2008 09:16:50 +0000 |
| parents | 4d6b73f7d013 |
| children | e0c30fe5624f |
| files | lisp/frame.el |
| diffstat | 1 files changed, 6 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/frame.el Wed Sep 03 09:15:44 2008 +0000 +++ b/lisp/frame.el Wed Sep 03 09:16:50 2008 +0000 @@ -99,10 +99,12 @@ (sexp :tag "Value"))) :group 'frames) -(setq pop-up-frame-function - ;; Using `function' here caused some sort of problem. - '(lambda () - (make-frame pop-up-frame-alist))) +(defcustom pop-up-frame-function + (lambda () (make-frame pop-up-frame-alist)) + "Function to call to handle automatic new frame creation. +It is called with no arguments and should return a newly created frame." + :type '(choice (const nil) (function :tag "function")) + :group 'frames) (defcustom special-display-frame-alist '((height . 14) (width . 80) (unsplittable . t))