# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 868517304 0
# Node ID d37ea94a4bb157097f1e41e3ecbfc52806f60d8b
# Parent  5d47a06d19bfe64b92e6f2c048f2c1dfaf70f5ff
Give t as arg NOERROR to
create-fontset-from-fontset-spec.

diff -r 5d47a06d19bf -r d37ea94a4bb1 lisp/term/x-win.el
--- 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)))
 	      )))))