From b9f33f360256714a9021e9dbcd8104d9fc1999ec Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Thu, 31 Jul 1997 05:54:08 +0000 Subject: [PATCH] (set-face-font-auto): Create a fontset if FONT is a fontset not instanciated fontset. --- lisp/faces.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/faces.el b/lisp/faces.el index 0641a1695e0..f925daa6e70 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -173,7 +173,9 @@ If the optional FRAME argument is provided, change only in that frame; otherwise change each frame." (interactive (internal-face-interactive "font")) (if (stringp font) - (setq font (or (query-fontset font) + (setq font (or (and (fontset-name-p font) + (or (query-fontset font) + (instanciate-fontset font))) (x-resolve-font-name font 'default frame)))) (internal-set-face-1 face 'font font 3 frame)) -- 2.39.2