     (princ text buffer)
     (when style
       (princ "</span>" buffer))))
--
+ 
 ;;; `font' tag based output support.
 
 (defun htmlize-font-body-tag (face-map)

(defun htmlize-default-body-tag (face-map)
  nil					; no doc-string
  "<body>")

;;; CSS based output support.

;; Internal function; not a method.

;; missing, the value of the variable will be nil, and rgb.txt will
;; not be used.
(defvar htmlize-color-rgb-hash (htmlize-get-color-rgb-hash))
 
;;; Face handling.

(defun htmlize-face-specifies-property (face prop)
