# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 870576690 0
# Node ID 349afa7775de5910d14485c4b637437d579a1e6e
# Parent  9f4b95f30c4f45bf529d3293bcf0946d711d6ac8
Fix previous change.

diff -r 9f4b95f30c4f -r 349afa7775de lisp/term/x-win.el
--- a/lisp/term/x-win.el	Sun Aug 03 02:50:47 1997 +0000
+++ b/lisp/term/x-win.el	Sun Aug 03 02:51:30 1997 +0000
@@ -650,10 +650,6 @@
     (progn
       ;; 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 specified in X resources "Fontset-N" (N is 0, 1, ...).
       (create-fontset-from-x-resource)
@@ -687,10 +683,7 @@
 		(aset xlfd-fields xlfd-regexp-encoding-subnum "startup")
 		(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 t)
 		(setq fontset-alias-alist
 		      (cons (cons fontset font) fontset-alias-alist)))
 	      )))))