diff options
-rw-r--r-- | lisp/frame.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/frame.el b/lisp/frame.el index 355486daa0a..0f64a361a97 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -667,9 +667,7 @@ setup is for focus to follow the pointer." (unless frame-creation-function (error "Don't know how to create a frame on window system %s" w)) (run-hooks 'before-make-frame-hook) - (setq frame (funcall frame-creation-function parameters)) - (modify-frame-parameters frame - (cdr (assq w window-system-default-frame-alist))) + (setq frame (funcall frame-creation-function (append parameters (cdr (assq w window-system-default-frame-alist))))) (run-hook-with-args 'after-make-frame-functions frame) frame)) |