Function: widget-color-sample-face-get

widget-color-sample-face-get is a byte-compiled function defined in wid-edit.el.gz.

Signature

(widget-color-sample-face-get WIDGET)

Source Code

;; Defined in /usr/src/emacs/lisp/wid-edit.el.gz
(defun widget-color-sample-face-get (widget)
  (let* ((value (condition-case nil
		    (widget-value widget)
		  (error (widget-get widget :value)))))
    (if (color-defined-p value)
	(list (cons 'foreground-color value))
      'default)))