diff options
author | Kenichi Handa <handa@m17n.org> | 1997-07-31 05:54:08 +0000 |
---|---|---|
committer | Kenichi Handa <handa@m17n.org> | 1997-07-31 05:54:08 +0000 |
commit | 7b26d5d3eb11612322fb57e4521d17a578183225 (patch) | |
tree | 68125af26ed79526b748877a6d4ebada1515c89a | |
parent | e418d265b4ccd4920b190e2c0b15f429bb148639 (diff) | |
download | emacs-7b26d5d3eb11612322fb57e4521d17a578183225.tar.gz |
(set-face-font-auto): Create a fontset if FONT is a
fontset not instanciated fontset.
-rw-r--r-- | lisp/faces.el | 4 |
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)) |