[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#14668: 24.3; htmlfontify-buffer under emacs -nw produces blank page
From: |
Glenn Morris |
Subject: |
bug#14668: 24.3; htmlfontify-buffer under emacs -nw produces blank page |
Date: |
Fri, 21 Jun 2013 21:22:42 -0400 |
User-agent: |
Gnus (www.gnus.org), GNU Emacs (www.gnu.org/software/emacs/) |
Thanks. I'm surprised this doesn't work. There seem to be two issues:
"unspecified-fg" and "unspecified-bg" colours, and the fact that font
:height == 1 in ttys. This hack seems to fix it:
*** lisp/htmlfontify.el 2013-02-22 01:32:45 +0000
--- lisp/htmlfontify.el 2013-06-22 01:18:50 +0000
***************
*** 748,753 ****
--- 748,756 ----
member lower than that of the color you are processing) strange things
may happen."
;;(message "hfy-colour-vals");;DBUG
+ (cond
+ ((equal colour "unspecified-fg") (setq colour "black"))
+ ((equal colour "unspecified-bg") (setq colour "white")))
(let ((white (mapcar (lambda (I) (float (1+ I))) (hfy-colour-vals "white")))
(rgb16 (mapcar (lambda (I) (float (1+ I))) (hfy-colour-vals
colour))))
(if rgb16
***************
*** 773,778 ****
--- 776,783 ----
"Derive a CSS font-size specifier from an Emacs font :height attribute
HEIGHT.
Does not cope with the case where height is a function to be applied to
the height of the underlying font."
+ ;; In ttys, the default face has :height == 1.
+ (and (not (display-graphic-p)) (equal 1 height) (setq height 120))
(list
(cond
;;(t (cons "font-size" ": 1em"))