From: Kenichi Handa <handa@m17n.org>
Date: Thu, 10 Jul 1997 06:48:24 +0000 (+0000)
Subject: Give t as arg NOERROR to
X-Git-Tag: emacs-20.1~1231
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fbe296b7b952d9ee340f8401703a31987b79c78b;p=emacs.git

Give t as arg NOERROR to
create-fontset-from-fontset-spec.
---

diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index f8c60808cff..9eeb1e9ad58 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -687,10 +687,10 @@ This is in addition to the primary selection.")
 		(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)))
 	      )))))