Function: custom--frame-color-default

custom--frame-color-default is a byte-compiled function defined in custom.el.gz.

Signature

(custom--frame-color-default FRAME ATTRIBUTE RESOURCE-ATTR RESOURCE-CLASS TTY-DEFAULT X-DEFAULT)

Source Code

;; Defined in /usr/src/emacs/lisp/custom.el.gz
(defun custom--frame-color-default (frame attribute resource-attr resource-class
					  tty-default x-default)
  (let ((col (face-attribute 'default attribute t)))
    (cond
     ((and col (not (eq col 'unspecified))) col)
     ((null (window-system frame)) tty-default)
     ((setq col (x-get-resource resource-attr resource-class)) col)
     (t x-default))))