mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-10 05:30:45 -08:00
Code Issues Projects Releases Wiki Activity

(Fx_create_frame): Delete unnecessary code.

Browse source
This commit is contained in:
Kenichi Handa 1997-05-16 00:43:41 +00:00
parent 0ef691383d
commit 632a44143f
1 changed files with 0 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

11
src/xfns.c
View file

@ -3274,19 +3274,8 @@ This function is an internal primitive--use `make-frame' instead.")
{
Lisp_Object font;
/* Determine font by the following priority.
1. `font' parameter in parms.
2. `font' parameter in Vdefault_frame_alist.
3. X resource "font" ("Font").
4. Select a plausible font be heuristics at least for ASCII. */
tem = Fassq (Qfont, parms);
if (NILP (tem))
tem = Fassq (Qfont, Vdefault_frame_alist);
if (!NILP (tem))
font = Fcdr (tem);
if (! STRINGP (font))
font = x_get_arg (dpyinfo, parms, Qfont, "font", "Font", string);
BLOCK_INPUT;
/* First, try whatever font the caller has specified. */
if (STRINGP (font))