Function: tty-create-frame-with-faces

tty-create-frame-with-faces is a byte-compiled function defined in faces.el.gz.

Signature

(tty-create-frame-with-faces &optional PARAMETERS)

Documentation

Create and return a frame from optional frame parameters PARAMETERS.

If PARAMETERS contains a reverse parameter, handle that.

Source Code

;; Defined in /usr/src/emacs/lisp/faces.el.gz
(defun tty-create-frame-with-faces (&optional parameters)
  "Create and return a frame from optional frame parameters PARAMETERS.
If PARAMETERS contains a `reverse' parameter, handle that."
  (let ((frame (make-terminal-frame parameters))
	success)
    (unwind-protect
	(with-selected-frame frame
	  (tty-handle-reverse-video frame (frame-parameters frame))

          (unless (terminal-parameter frame 'terminal-initted)
            (set-terminal-parameter frame 'terminal-initted t)
            (set-locale-environment nil frame)
            (tty-run-terminal-initialization frame nil t))
	  (frame-set-background-mode frame t)
	  (face-set-after-frame-default frame parameters)
	  (setq success t))
      (unless success
	(delete-frame frame)))
    frame))