Mercurial > emacs
changeset 89900:7ad4af87a4d4
(x-complement-fontset-spec): Don't
change CHARSET_REGISTRY and CHARSET_ENCODING fields.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Wed, 14 Apr 2004 05:13:56 +0000 |
| parents | ca6423ca8d9d |
| children | d1a1970e3dd1 |
| files | lisp/international/fontset.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/fontset.el Tue Apr 13 11:04:53 2004 +0000 +++ b/lisp/international/fontset.el Wed Apr 14 05:13:56 2004 +0000 @@ -527,7 +527,7 @@ (setq font-spec (make-vector 6 nil)) (dotimes (i 6) (aset font-spec i (match-string (1+ i) name))) - (dotimes (i 6) + (dotimes (i 5) (if (string-match "^[*-]+$" (aref font-spec i)) (aset font-spec i (aref default-spec i)))) (setcar (cdr elt) font-spec))))