mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-16 17:19:41 +00:00
Code Issues Releases Activity

(Info-fontify-node): Use `string-width' for fontifying underlined titles.

Browse Source
This commit is contained in:
Juri Linkov 2005-11-01 10:04:19 +00:00
parent 993159761a
commit 4dacf0ff4b
2 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2005-11-01 KOBAYASHI Yasuhiro <kobayays@otsukakj.co.jp> (tiny change)
* info.el (Info-fontify-node): Use `string-width' for fontifying
underlined titles.
2005-11-01 Juri Linkov <juri@jurta.org>
* info.el (Info-fontify-node): Downcase node header keywords Node,

4
lisp/info.el
View File

@ -3722,8 +3722,8 @@ the variable `Info-file-list-for-emacs'."
;; 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)