Function: custom-face-attributes-get

custom-face-attributes-get is a byte-compiled function defined in cus-face.el.gz.

Signature

(custom-face-attributes-get FACE FRAME)

Documentation

For FACE on FRAME, return an alternating list describing its attributes.

The list has the form (KEYWORD VALUE KEYWORD VALUE...). Each keyword should be listed in custom-face-attributes.

If FRAME is nil, use the global defaults for FACE.

Source Code

;; Defined in /usr/src/emacs/lisp/cus-face.el.gz
(defun custom-face-attributes-get (face frame)
  "For FACE on FRAME, return an alternating list describing its attributes.
The list has the form (KEYWORD VALUE KEYWORD VALUE...).
Each keyword should be listed in `custom-face-attributes'.

If FRAME is nil, use the global defaults for FACE."
  (let ((attrs custom-face-attributes)
	plist)
    (while attrs
      (let* ((attribute (car (car attrs)))
	     (value (face-attribute face attribute frame)))
	(setq attrs (cdr attrs))
	(unless (or (eq value 'unspecified)
		    (and (null value) (memq attribute '(:inherit))))
	  (setq plist (cons attribute (cons value plist))))))
    plist))