procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(face-color-gray-p): Return nil if x-color-values does.

Browse source
This commit is contained in:
Richard M. Stallman 1996-01-29 07:27:04 +00:00
parent 68dff3ca9c
commit 25ae394e86
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/faces.el
View file

@ -139,7 +139,8 @@ FRAME specifies the frame and thus the display for interpreting COLOR."
(r (nth 0 values))
(g (nth 1 values))
(b (nth 2 values)))
(and (< (abs (- r g)) (/ (max 1 (abs r) (abs g)) 20))
(and values
(< (abs (- r g)) (/ (max 1 (abs r) (abs g)) 20))
(< (abs (- g b)) (/ (max 1 (abs g) (abs b)) 20))
(< (abs (- b r)) (/ (max 1 (abs b) (abs r)) 20)))))