Mercurial > emacs
changeset 19050:c11b9b44e233
(set-face-font-auto): Create a fontset if FONT is a
fontset not instanciated fontset.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Thu, 31 Jul 1997 05:54:08 +0000 |
| parents | cad4c032fa26 |
| children | 4572e0e4aef1 |
| files | lisp/faces.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/faces.el Thu Jul 31 05:53:31 1997 +0000 +++ b/lisp/faces.el Thu Jul 31 05:54:08 1997 +0000 @@ -173,7 +173,9 @@ 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))