(interactive)
(run-hooks 'before-make-frame-hook)
(let ((frame (funcall frame-creation-function parameters)))
- (custom-initialize-frame frame)
(run-hook-with-args 'after-make-frame-functions frame)
frame))
;;;; frame parameters.
(defun frame-parameter (frame parameter)
- "Return FRAME's value for parameter PARAMETER."
- (cdr (assq parameter(frame-parameters frame))))
+ "Return FRAME's value for parameter PARAMETER.
+If FRAME is omitted, describe the currently selected frame."
+ (cdr (assq parameter (frame-parameters frame))))
(defun frame-height (&optional frame)
"Return number of lines available for display on FRAME.