[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master d8a6d2e: ; * lisp/faces.el (readable-foreground-color): Fix editi

From: Mattias Engdegård
Subject: master d8a6d2e: ; * lisp/faces.el (readable-foreground-color): Fix editing mistake.
Date: Wed, 10 Jun 2020 18:07:16 -0400 (EDT)

branch: master
commit d8a6d2e4810a4072cabbf76170dc4bf708f27d10
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>

    ; * lisp/faces.el (readable-foreground-color): Fix editing mistake.
 lisp/faces.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/faces.el b/lisp/faces.el
index 5ecc256..8c3e464 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1790,7 +1790,8 @@ The returned value is a string representing black or 
white, depending
 on which one provides better contrast with COLOR."
   ;; We use #ffffff instead of "white", because the latter is sometimes
   ;; less than white.  That way, we get the best contrast possible.
-  (if (color-dark-p (mapcar (lambda (c) (/ c 65535.0)) color))
+  (if (color-dark-p (mapcar (lambda (c) (/ c 65535.0))
+                            (color-values color)))
       "#ffffff" "black"))
 (defun color-dark-p (rgb)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]