larstvei/Focus
1
0
Fork 0
mirror of https://github.com/larstvei/Focus.git synced 2025-11-04 02:00:11 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

fixed the focus-average-colors docstring

Browse Source
This commit is contained in:
Lars Tveito 2015-05-18 00:46:43 +02:00
parent 4c8391ea32
commit 5753e25fdf
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
focus.el
View File

@ -97,7 +97,9 @@ Things that are defined include `symbol', `list', `sexp',
(bounds-of-thing-at-point thing))) (bounds-of-thing-at-point thing)))
(defun focus-average-colors (color &rest colors) (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)) (let* ((colors (cons color colors))
(colors (mapcar 'color-name-to-rgb colors)) (colors (mapcar 'color-name-to-rgb colors))
(len (length colors)) (len (length colors))