aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/term
diff options
context:
space:
mode:
authorKenichi Handa1997-08-03 02:51:30 +0000
committerKenichi Handa1997-08-03 02:51:30 +0000
commit9ff9457b2d71a33db8ceef8bf6e5745e7db7338a (patch)
tree7729e48550464b76e63c654d1b2d7d62fbdf54b0 /lisp/term
parent5871092a2c633961c3b76d9a094932a5f06c8f0a (diff)
downloademacs-9ff9457b2d71a33db8ceef8bf6e5745e7db7338a.tar.gz
emacs-9ff9457b2d71a33db8ceef8bf6e5745e7db7338a.zip
Fix previous change.
Diffstat (limited to 'lisp/term')
-rw-r--r--lisp/term/x-win.el9
1 files changed, 1 insertions, 8 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index c16c021164d..d991f3b76a8 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -650,10 +650,6 @@ This is in addition to the primary selection.")
650 (progn 650 (progn
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.
654 ;;(create-fontset-from-fontset-spec standard-fontset-spec 'bold)
655 ;;(create-fontset-from-fontset-spec standard-fontset-spec 'italic)
656 ;;(create-fontset-from-fontset-spec standard-fontset-spec 'bold-italic)
657 653
658 ;; Create fontset specified in X resources "Fontset-N" (N is 0, 1, ...). 654 ;; Create fontset specified in X resources "Fontset-N" (N is 0, 1, ...).
659 (create-fontset-from-x-resource) 655 (create-fontset-from-x-resource)
@@ -687,10 +683,7 @@ This is in addition to the primary selection.")
687 (aset xlfd-fields xlfd-regexp-encoding-subnum "startup") 683 (aset xlfd-fields xlfd-regexp-encoding-subnum "startup")
688 (setq fontset (x-compose-font-name xlfd-fields)) 684 (setq fontset (x-compose-font-name xlfd-fields))
689 (setq fontset-spec (concat fontset ", ascii:" font)) 685 (setq fontset-spec (concat fontset ", ascii:" font))
690 (create-fontset-from-fontset-spec fontset-spec nil t) 686 (create-fontset-from-fontset-spec fontset-spec t)
691 ;;(create-fontset-from-fontset-spec fontset-spec 'bold t)
692 ;;(create-fontset-from-fontset-spec fontset-spec 'italic t)
693 ;;(create-fontset-from-fontset-spec fontset-spec 'bold-italic t)
694 (setq fontset-alias-alist 687 (setq fontset-alias-alist
695 (cons (cons fontset font) fontset-alias-alist))) 688 (cons (cons fontset font) fontset-alias-alist)))
696 ))))) 689 )))))