Mercurial > emacs
changeset 66606:a39846866a71
(Info-fontify-node): Use `string-width' for fontifying underlined titles.
author | Juri Linkov <juri@jurta.org> |
---|---|
date | Tue, 01 Nov 2005 10:03:01 +0000 |
parents | 9e4ea1d6f43c |
children | e8dab90b9670 |
files | lisp/info.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/info.el Tue Nov 01 09:56:07 2005 +0000 +++ b/lisp/info.el Tue Nov 01 10:03:01 2005 +0000 @@ -3722,8 +3722,8 @@ ;; underline has the same size as the text. A typical ;; counter example is when a continuation "..." is alone ;; on a line. - (= (- (match-end 1) (match-beginning 1)) - (- (match-end 2) (match-beginning 2)))) + (= (string-width (match-string 1)) + (string-width (match-string 2)))) (let* ((c (preceding-char)) (face (cond ((= c ?*) 'info-title-1)