summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1997-07-31 05:54:08 +0000
committerKenichi Handa <handa@m17n.org>1997-07-31 05:54:08 +0000
commit7b26d5d3eb11612322fb57e4521d17a578183225 (patch)
tree68125af26ed79526b748877a6d4ebada1515c89a
parente418d265b4ccd4920b190e2c0b15f429bb148639 (diff)
downloademacs-7b26d5d3eb11612322fb57e4521d17a578183225.tar.gz
(set-face-font-auto): Create a fontset if FONT is a
fontset not instanciated fontset.
-rw-r--r--lisp/faces.el4
1 files changed, 3 insertions, 1 deletions
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))