Mercurial > emacs
changeset 19051:4572e0e4aef1
Do not create style-variants of fontset. They
are just registered in uninstanciated-fontset-alist.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Thu, 31 Jul 1997 05:54:43 +0000 |
| parents | c11b9b44e233 |
| children | 302a7b2a6948 |
| files | lisp/term/x-win.el |
| diffstat | 1 files changed, 6 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/term/x-win.el Thu Jul 31 05:54:08 1997 +0000 +++ b/lisp/term/x-win.el Thu Jul 31 05:54:43 1997 +0000 @@ -651,9 +651,9 @@ ;; Create the standard fontset. (create-fontset-from-fontset-spec standard-fontset-spec) ;; Create variants of the standard fontset. - (create-fontset-from-fontset-spec standard-fontset-spec 'bold) - (create-fontset-from-fontset-spec standard-fontset-spec 'italic) - (create-fontset-from-fontset-spec standard-fontset-spec 'bold-italic) + ;;(create-fontset-from-fontset-spec standard-fontset-spec 'bold) + ;;(create-fontset-from-fontset-spec standard-fontset-spec 'italic) + ;;(create-fontset-from-fontset-spec standard-fontset-spec 'bold-italic) ;; Create fontset specified in X resources "Fontset-N" (N is 0, 1, ...). (create-fontset-from-x-resource) @@ -688,9 +688,9 @@ (setq fontset (x-compose-font-name xlfd-fields)) (setq fontset-spec (concat fontset ", ascii:" font)) (create-fontset-from-fontset-spec fontset-spec nil t) - (create-fontset-from-fontset-spec fontset-spec 'bold t) - (create-fontset-from-fontset-spec fontset-spec 'italic t) - (create-fontset-from-fontset-spec fontset-spec 'bold-italic t) + ;;(create-fontset-from-fontset-spec fontset-spec 'bold t) + ;;(create-fontset-from-fontset-spec fontset-spec 'italic t) + ;;(create-fontset-from-fontset-spec fontset-spec 'bold-italic t) (setq fontset-alias-alist (cons (cons fontset font) fontset-alias-alist))) )))))