fixed the focus-average-colors docstring

This commit is contained in:
Lars Tveito 2015-05-18 00:46:43 +02:00
parent 4c8391ea32
commit 5753e25fdf

View File

@ -97,7 +97,9 @@ Things that are defined include `symbol', `list', `sexp',
(bounds-of-thing-at-point thing)))
(defun focus-average-colors (color &rest colors)
"Takes one or more COLORS and returns the average of the RGB-values."
"Takes an average of the colors given by argument.
Argument COLOR is a color name, and so is COLORS; COLOR is there
to ensure that the the function receives at least one argument."
(let* ((colors (cons color colors))
(colors (mapcar 'color-name-to-rgb colors))
(len (length colors))