Mercurial > emacs
diff src/xterm.c @ 89002:705b93129869
(main): In the case of --unibyte, instead of aborting on finding
non-empty buffer, make it unibyte.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Mon, 19 Aug 2002 06:11:15 +0000 |
parents | b604878589f4 |
children | 3bbfb5d2bb52 |
line wrap: on
line diff
--- a/src/xterm.c Sun Aug 18 16:57:27 2002 +0000 +++ b/src/xterm.c Mon Aug 19 06:11:15 2002 +0000 @@ -12289,10 +12289,14 @@ if (fontset < 0) { - Lisp_Object fontlist; - - fontlist = Fcons (Fcons (Qascii, Fcons (result, Qnil)), Qnil); - Fnew_fontset (result, fontlist); + Lisp_Object func; + + func = intern ("create-fontset-from-ascii-font"); + if (! NILP (Ffboundp (func))) + result = call2 (func, result, result); + else + Fnew_fontset (result, + Fcons (Fcons (Qascii, Fcons (result, Qnil)), Qnil)); fontset = fs_query_fontset (result, 0); }