[Emacs-diffs] emacs-24 r117360: * lisp/facemenu.el (list-colors-print): In help-echo format use %.2f

[Juri Linkov]

------------------------------------------------------------
revno: 117360
revision-id: address@hidden
parent: address@hidden
committer: Juri Linkov <address@hidden>
branch nick: emacs-24
timestamp: Tue 2014-07-08 11:55:00 +0300
message:
  * lisp/facemenu.el (list-colors-print): In help-echo format use %.2f
  instead of %d because now HSV values are floating-point components
  between 0.0 and 1.0.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/facemenu.el               facemenu.el-20091113204419-o5vbwnq5f7feedwu-786

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2014-07-06 23:58:52 +0000
+++ b/lisp/ChangeLog    2014-07-08 08:55:00 +0000
@@ -1,3 +1,9 @@
+2014-07-08  Juri Linkov  <address@hidden>
+
+       * facemenu.el (list-colors-print): In help-echo format use %.2f
+       instead of %d because now HSV values are floating-point components
+       between 0.0 and 1.0.
+
 2014-07-06  Glenn Morris  <address@hidden>
 
        * emulation/cua-rect.el (cua--activate-rectangle):

=== modified file 'lisp/facemenu.el'
--- a/lisp/facemenu.el  2014-01-01 07:43:34 +0000
+++ b/lisp/facemenu.el  2014-07-08 08:55:00 +0000
@@ -620,7 +620,7 @@
                 'help-echo
                 (let ((hsv (apply 'color-rgb-to-hsv
                                   (color-name-to-rgb (car color)))))
-                  (format "H:%d S:%d V:%d"
+                  (format "H:%.2f S:%.2f V:%.2f"
                           (nth 0 hsv) (nth 1 hsv) (nth 2 hsv)))))
        (when callback
          (make-text-button