Signed-off-by: Julien Danjou <julien@danjou.info>
2010-11-23 Julien Danjou <julien@danjou.info>
2010-11-23 Julien Danjou <julien@danjou.info>
+ * color-lab.el (boundp): Bind float-pi for Emacs < 23.3.
+
* shr-color.el (shr-color->hexadecimal): Add support for color names.
* shr.el (shr-parse-style): Replace \n with space in style parsing.
* shr-color.el (shr-color->hexadecimal): Add support for color names.
* shr.el (shr-parse-style): Replace \n with space in style parsing.
+;; Emacs < 23.3
+(unless (boundp 'float-pi)
+ (defconst float-pi (* 4 (atan 1)) "The value of Pi (3.1415926...)."))
+
(defun rgb->hsv (red green blue)
"Convert RED GREEN BLUE values to HSV representation.
Hue is in radian. Saturation and values are between 0 and 1."
(defun rgb->hsv (red green blue)
"Convert RED GREEN BLUE values to HSV representation.
Hue is in radian. Saturation and values are between 0 and 1."