Function: make-face-x-resource-internal

make-face-x-resource-internal is a byte-compiled function defined in faces.el.gz.

Signature

(make-face-x-resource-internal FACE &optional FRAME)

Documentation

Fill frame-local FACE on FRAME from X resources.

FRAME nil or not specified means do it for all frames.

If inhibit-x-resources is non-nil, this function does nothing.

Source Code

;; Defined in /usr/src/emacs/lisp/faces.el.gz
(defun make-face-x-resource-internal (face &optional frame)
  "Fill frame-local FACE on FRAME from X resources.
FRAME nil or not specified means do it for all frames.

If `inhibit-x-resources' is non-nil, this function does nothing."
  (unless inhibit-x-resources
    (dolist (frame (if (null frame) (frame-list) (list frame)))
      ;; `x-create-frame' already took care of correctly handling
      ;; the reverse video case-- do _not_ touch the default face
      (unless (and (eq face 'default)
		   (frame-parameter frame 'reverse))
        (set-face-attributes-from-resources face frame)))))