+2010-11-24 Katsumi Yamaoka <yamaoka@jpl.org>
+
+ * color-lab.el: Add coding cookie.
+ (float-pi): Use eval-and-compile.
+
+ * dgnushack.el (dgnushack-compile): Exclude shr-color.el from being
+ compiled for Emacsen having no `libxml-parse-html-region' support.
+
2010-11-23 Lars Magne Ingebrigtsen <larsi@gnus.org>
* shr.el (shr-insert-color-overlay): Split stuff like
-;;; color-lab.el --- Color manipulation laboratory routines
+;;; color-lab.el --- Color manipulation laboratory routines -*- coding: utf-8; -*-
;; Copyright (C) 2010 Free Software Foundation, Inc.
;;; Code:
;; Emacs < 23.3
-(unless (boundp 'float-pi)
- (defconst float-pi (* 4 (atan 1)) "The value of Pi (3.1415926...)."))
+(eval-and-compile
+ (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.
(* Rt (/ ΔC′ (* Sc kC)) (/ ΔH′ (* Sh kH)))))))))
(provide 'color-lab)
+
+;;; color-lab.el ends here
;; lpath.el binds it.
(not (eq (symbol-function 'libxml-parse-html-region)
'ignore)))
- (setq files (delete "shr.el" files)))
+ (setq files (delete "shr-color.el" (delete "shr.el" files))))
(dolist (file files)
(setq file (expand-file-name file srcdir))