diff options
| author | Kenichi Handa | 1997-07-31 05:54:43 +0000 |
|---|---|---|
| committer | Kenichi Handa | 1997-07-31 05:54:43 +0000 |
| commit | 0f36e5fc3b831900fe90978442875f8a87cc209a (patch) | |
| tree | 9368a96f60af9e336abc9ba3096a5b500d76dd0a | |
| parent | b9f33f360256714a9021e9dbcd8104d9fc1999ec (diff) | |
| download | emacs-0f36e5fc3b831900fe90978442875f8a87cc209a.tar.gz emacs-0f36e5fc3b831900fe90978442875f8a87cc209a.zip | |
Do not create style-variants of fontset. They
are just registered in uninstanciated-fontset-alist.
| -rw-r--r-- | lisp/term/x-win.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index 9eeb1e9ad58..c16c021164d 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el | |||
| @@ -651,9 +651,9 @@ This is in addition to the primary selection.") | |||
| 651 | ;; Create the standard fontset. | 651 | ;; Create the standard fontset. |
| 652 | (create-fontset-from-fontset-spec standard-fontset-spec) | 652 | (create-fontset-from-fontset-spec standard-fontset-spec) |
| 653 | ;; Create variants of the standard fontset. | 653 | ;; Create variants of the standard fontset. |
| 654 | (create-fontset-from-fontset-spec standard-fontset-spec 'bold) | 654 | ;;(create-fontset-from-fontset-spec standard-fontset-spec 'bold) |
| 655 | (create-fontset-from-fontset-spec standard-fontset-spec 'italic) | 655 | ;;(create-fontset-from-fontset-spec standard-fontset-spec 'italic) |
| 656 | (create-fontset-from-fontset-spec standard-fontset-spec 'bold-italic) | 656 | ;;(create-fontset-from-fontset-spec standard-fontset-spec 'bold-italic) |
| 657 | 657 | ||
| 658 | ;; Create fontset specified in X resources "Fontset-N" (N is 0, 1, ...). | 658 | ;; Create fontset specified in X resources "Fontset-N" (N is 0, 1, ...). |
| 659 | (create-fontset-from-x-resource) | 659 | (create-fontset-from-x-resource) |
| @@ -688,9 +688,9 @@ This is in addition to the primary selection.") | |||
| 688 | (setq fontset (x-compose-font-name xlfd-fields)) | 688 | (setq fontset (x-compose-font-name xlfd-fields)) |
| 689 | (setq fontset-spec (concat fontset ", ascii:" font)) | 689 | (setq fontset-spec (concat fontset ", ascii:" font)) |
| 690 | (create-fontset-from-fontset-spec fontset-spec nil t) | 690 | (create-fontset-from-fontset-spec fontset-spec nil t) |
| 691 | (create-fontset-from-fontset-spec fontset-spec 'bold t) | 691 | ;;(create-fontset-from-fontset-spec fontset-spec 'bold t) |
| 692 | (create-fontset-from-fontset-spec fontset-spec 'italic t) | 692 | ;;(create-fontset-from-fontset-spec fontset-spec 'italic t) |
| 693 | (create-fontset-from-fontset-spec fontset-spec 'bold-italic t) | 693 | ;;(create-fontset-from-fontset-spec fontset-spec 'bold-italic t) |
| 694 | (setq fontset-alias-alist | 694 | (setq fontset-alias-alist |
| 695 | (cons (cons fontset font) fontset-alias-alist))) | 695 | (cons (cons fontset font) fontset-alias-alist))) |
| 696 | ))))) | 696 | ))))) |