diff lisp/term/x-win.el @ 18715:d37ea94a4bb1

Give t as arg NOERROR to create-fontset-from-fontset-spec.
author Kenichi Handa <handa@m17n.org>
date Thu, 10 Jul 1997 06:48:24 +0000
parents b726d209302c
children 4572e0e4aef1
line wrap: on
line diff
--- a/lisp/term/x-win.el	Thu Jul 10 06:46:42 1997 +0000
+++ b/lisp/term/x-win.el	Thu Jul 10 06:48:24 1997 +0000
@@ -687,10 +687,10 @@
 		(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)
-		(create-fontset-from-fontset-spec fontset-spec 'bold)
-		(create-fontset-from-fontset-spec fontset-spec 'italic)
-		(create-fontset-from-fontset-spec fontset-spec 'bold-italic)
+		(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)
 		(setq fontset-alias-alist
 		      (cons (cons fontset font) fontset-alias-alist)))
 	      )))))