diff options
Diffstat (limited to 'emacs.d/elisp/htmlize.el')
| -rw-r--r-- | emacs.d/elisp/htmlize.el | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/emacs.d/elisp/htmlize.el b/emacs.d/elisp/htmlize.el index f3a13f6..2b1d9a7 100644 --- a/emacs.d/elisp/htmlize.el +++ b/emacs.d/elisp/htmlize.el @@ -581,7 +581,7 @@ without modifying their meaning." (goto-char (point-min)) (while (search-forward "Local Variables:" nil t) (replace-match "Local Variables:" nil t))) - + ;;; Color handling. @@ -744,7 +744,7 @@ If no rgb.txt file is found, return nil." (t ;; We're getting the RGB components from Emacs. (let ((rgb - ;; Here I cannot conditionalize on (fboundp ...) + ;; Here I cannot conditionalize on (fboundp ...) ;; because ps-print under some versions of GNU Emacs ;; defines its own dummy version of ;; `color-instance-rgb-components'. @@ -880,10 +880,10 @@ If no rgb.txt file is found, return nil." (setq face (face-attribute face :inherit))) (face-attribute face attr))))) (when (and value (not (eq value 'unspecified))) - (htmlize-face-emacs21-attr fstruct attr value)))) - (let ((size (htmlize-face-size face))) - (unless (eql size 1.0) ; ignore non-spec - (setf (htmlize-fstruct-size fstruct) size)))) + (htmlize-face-emacs21-attr fstruct attr value))))) + ;(let ((size (htmlize-face-size face))) + ; (unless (eql size 1.0) ; ignore non-spec + ; (setf (htmlize-fstruct-size fstruct) size)))) (setf (htmlize-fstruct-css-name fstruct) (htmlize-face-css-name face)) fstruct)) @@ -1148,7 +1148,7 @@ property and by buffer overlays that specify `face'." ;; `insert-head', `body-tag', and `insert-text'. Not all output types ;; define all methods. ;; -;; Methods are called either with (htmlize-method METHOD ARGS...) +;; Methods are called either with (htmlize-method METHOD ARGS...) ;; special form, or by accessing the function with ;; (htmlize-method-function 'METHOD) and calling (funcall FUNCTION). ;; The latter form is useful in tight loops because `htmlize-method' @@ -1303,7 +1303,7 @@ it's called with the same value of KEY. All other times, the cached (format "<body text=\"%s\" bgcolor=\"%s\">" (htmlize-fstruct-foreground fstruct) (htmlize-fstruct-background fstruct)))) - + (defun htmlize-font-insert-text (text fstruct-list buffer) ;; In `font' mode, we use the traditional HTML means of altering ;; presentation: <font> tag for colors, <b> for bold, <u> for |