From: regcl <regcl@channing.harvard.edu>
To: Glenn Morris <rgm@gnu.org>
Cc: 14668@debbugs.gnu.org
Subject: bug#14668: 24.3; htmlfontify-buffer under emacs -nw produces blank page
Date: Tue, 16 Jul 2013 18:14:54 -0400 [thread overview]
Message-ID: <qrhzjtm9mox.fsf@sombrero01.bwh.harvard.edu> (raw)
In-Reply-To: <bihagraqhp.fsf@fencepost.gnu.org> (Glenn Morris's message of "Fri, 21 Jun 2013 21:22:42 -0400")
Hi Glenn, Sorry for the delay in responding. That fixes the problem for me. Many thanks! regcl
Glenn Morris <rgm@gnu.org> writes:
> 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"))
prev parent reply other threads:[~2013-07-16 22:14 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2013-06-19 19:36 bug#14668: 24.3; htmlfontify-buffer under emacs -nw produces blank page regcl
2013-06-22 1:22 ` Glenn Morris
2013-06-26 7:00 ` Glenn Morris
2013-07-16 22:14 ` regcl [this message]
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=qrhzjtm9mox.fsf@sombrero01.bwh.harvard.edu \
--to=regcl@channing.harvard.edu \
--cc=14668@debbugs.gnu.org \
--cc=rgm@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.