Function: cperl-choose-color

cperl-choose-color is a byte-compiled function defined in cperl-mode.el.gz.

Signature

(cperl-choose-color &rest LIST)

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/cperl-mode.el.gz
(defun cperl-choose-color (&rest list)
  (let (answer)
    (while list
      (or answer
	  (if (or (x-color-defined-p (car list))
		  (null (cdr list)))
	      (setq answer (car list))))
      (setq list (cdr list)))
    answer))