From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Lars Ingebrigtsen Newsgroups: gmane.emacs.devel Subject: Re: HTML-Info design Date: Mon, 26 Jan 2015 17:52:21 +1100 Message-ID: <87ppa2ghju.fsf@building.gnus.org> References: <87sig6xech.fsf@ferrier.me.uk> <83fvc5ni0u.fsf@gnu.org> <87k31fwwyv.fsf@ferrier.me.uk> <87bnmq9ibf.fsf@ferrier.me.uk> <87lhlrx5fc.fsf@building.gnus.org> <878uhrcr5l.fsf@building.gnus.org> <83sifzjflk.fsf@gnu.org> <87fvbyagaw.fsf@building.gnus.org> <83iogujvbq.fsf@gnu.org> <87tx0ee7rf.fsf@building.gnus.org> <83egricpvg.fsf@gnu.org> <87zj97vic8.fsf@building.gnus.org> <83wq4argjp.fsf@gnu.org> <87iofui8vo.fsf@building.gnus.org> <838ugqqczp.fsf@gnu.org> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: ger.gmane.org 1422255277 1307 80.91.229.3 (26 Jan 2015 06:54:37 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Mon, 26 Jan 2015 06:54:37 +0000 (UTC) Cc: emacs-devel@gnu.org To: Eli Zaretskii Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Mon Jan 26 07:54:33 2015 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1YFdZA-0002ZF-CQ for ged-emacs-devel@m.gmane.org; Mon, 26 Jan 2015 07:54:32 +0100 Original-Received: from localhost ([::1]:40186 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1YFdZ9-0004SH-Re for ged-emacs-devel@m.gmane.org; Mon, 26 Jan 2015 01:54:31 -0500 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:53290) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1YFdZ5-0004Ry-Fe for emacs-devel@gnu.org; Mon, 26 Jan 2015 01:54:28 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1YFdZ4-00077U-8l for emacs-devel@gnu.org; Mon, 26 Jan 2015 01:54:27 -0500 Original-Received: from smtp.syd.comcen.com.au ([203.23.236.77]:2616) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1YFdZ0-00073X-3S; Mon, 26 Jan 2015 01:54:22 -0500 Original-Received: from building.gnus.org ([27.96.197.126]) by smtp.syd.comcen.com.au (8.13.4/8.12.9) with ESMTP id t0Q6qPYi018192; Mon, 26 Jan 2015 17:52:26 +1100 (EST) In-Reply-To: <838ugqqczp.fsf@gnu.org> (Eli Zaretskii's message of "Mon, 26 Jan 2015 08:20:42 +0200") User-Agent: Gnus/5.130012 (Ma Gnus v0.12) Emacs/25.0.50 (gnu/linux) X-comcen-MailScanner-Information: Please contact the ISP for more information X-comcen-MailScanner: Found to be clean X-comcen-MailScanner-SpamCheck: not spam, SpamAssassin (not cached, score=0.1, required 4, AWL -0.00, BAYES_50 0.00, RDNS_NONE 0.10) X-comcen-MailScanner-From: larsi@gnus.org X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-Received-From: 203.23.236.77 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:181778 Archived-At: Eli Zaretskii writes: > Try this instead: > > (defun pixel-region-width (start end) > (let ((width 0)) > (while (< start end) > (let ((glyphs (font-get-glyphs (font-at start) start (1+ start)))) > (setq width (+ width (aref (car glyphs) 4)))) ;; ^^^^^^^^^^ D'oh. Thanks for the help. :-) I'll start experimenting with making shr using proportional fonts for the text and see how far I get. A new branch will probably appear in the Emacs repo tomorrowish... -- (domestic pets only, the antidote for overdose, milk.) bloggy blog http://lars.ingebrigtsen.no/