Mercurial > emacs
changeset 101815:f237c13dd6f5
(setup-default-fontset): Append entries for mathematical, instead of
prepending.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Thu, 05 Feb 2009 07:09:47 +0000 |
parents | 8ea121e8bd97 |
children | 5e57e0473132 |
files | lisp/international/fontset.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/fontset.el Thu Feb 05 06:47:31 2009 +0000 +++ b/lisp/international/fontset.el Thu Feb 05 07:09:47 2009 +0000 @@ -557,7 +557,7 @@ (setcdr slot (vconcat (cdr slot) (vector (car math-subgroup)))) (setcdr slot (vector (cadr slot) (car math-subgroup)))) (setq slot (list (nth 2 math-subgroup) (car math-subgroup))) - (push slot script-representative-chars))) + (nconc script-representative-chars (list slot)))) (set-fontset-font "fontset-default" (cons (car math-subgroup) (nth 1 math-subgroup))