[gnus git] branch master updated: n0-17-472-g66ae519 =1= color: add missing float

Julien Danjou <[email protected]>
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  66ae5194ddbc52b036936ccc50df86f4d4eaef41 (commit)
      from  731c0e590ea80d0eae78b2e7babb939cfd036bea (commit)


- Log -----------------------------------------------------------------
commit 66ae5194ddbc52b036936ccc50df86f4d4eaef41
Author: Julien Danjou <[email protected]>
Date:   Thu Jan 19 15:11:58 2012 +0100

    color: add missing float
    
    Signed-off-by: Julien Danjou <[email protected]>

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d1a7da4..c0bc77a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -2,6 +2,7 @@
 
 	* color.el (color-name-to-rgb): Use the white color to find the max
 	color component value and return correctly computed values.
+	(color-name-to-rgb): Add missing float conversion for max value.
 
 2012-01-10  Teodor Zlatanov  <[email protected]>
 
diff --git a/lisp/color.el b/lisp/color.el
index 3112e0d..6fab613 100644
--- a/lisp/color.el
+++ b/lisp/color.el
@@ -55,7 +55,7 @@ displayed.  If FRAME is omitted or nil, use the selected frame.
 If FRAME cannot display COLOR, return nil."
   ;; `colors-values' maximum value is either 65535 or 65280 depending on the
   ;; display system. So we use a white conversion to get the max value.
-  (let ((valmax (car (color-values "#ffffff"))))
+  (let ((valmax (float (car (color-values "#ffffff")))))
     (mapcar (lambda (x) (/ x valmax)) (color-values color frame))))
 
 (defun color-rgb-to-hex  (red green blue)

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog |    1 +
 lisp/color.el  |    2 +-
 2 files changed, 2 insertions(+), 1 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.